[go: up one dir, main page]

login
A372876
Row sums of A372877.
1
0, 1, 1, 1, 2, 0, 2, 1, 0, 3, 2, 3, 0, 0, 4, 2, 8, 0, 0, 3, 0, 0, 2, 3, 0, 10, 6, 1, 0, 0, 4, 3, 0, 0, 4, 6, 12, 0, 6, 4, 0, 0, 4, 3, 0, 0, 4, 5, 0, 21, 2, 6, 0, 0, 2, 4, 0, 0, 2, 9, 0, 0, 8, 2, 32, 0, 8, 3, 0, 0, 4, 7, 0, 0, 10, 2, 0, 0, 4, 5, 0, 27, 4, 9, 0, 0
OFFSET
0,5
MAPLE
J := (n, k) -> ifelse(k::even, 0, NumberTheory:-JacobiSymbol(n, k)):
seq(add(J(n, k), k = 0..n), n = 0..85);
PROG
(PARI) a(n) = vecsum(vector(n, k, if (k%2, kronecker(n, k)))); \\ Michel Marcus, May 19 2024
CROSSREFS
Cf. A372877.
Sequence in context: A177446 A074905 A058548 * A157030 A080844 A321428
KEYWORD
nonn
AUTHOR
Peter Luschny, May 19 2024
STATUS
approved