A220780 Nonzero terms of A220779: exponent of highest power of 2 dividing an even sum 1^n + 2^n + ... + n^n.

2, 1, 4, 2, 2, 1, 6, 3, 2, 1, 4, 2, 2, 1, 8, 4, 2, 1, 4, 2, 2, 1, 6, 3, 2, 1, 4, 2, 2, 1, 10, 5, 2, 1, 4, 2, 2, 1, 6, 3, 2, 1, 4, 2, 2, 1, 8, 4, 2, 1, 4, 2, 2, 1, 6, 3, 2, 1, 4, 2, 2, 1, 12, 6, 2, 1, 4, 2, 2, 1, 6, 3, 2, 1, 4, 2, 2, 1, 8, 4, 2, 1, 4, 2, 2, 1

Offset

1,1

Comments

2-adic valuation of Sum_{k=1..n} k^n for n == 0 or 3 mod 4.

See references, links, formulas, and example in A220779.

Links

Table of n, a(n) for n=1..86.

Mathematica

Table[n = 2*k + Mod[k, 2]; IntegerExponent[ Sum[a^n, {a, 1, n}], 2], {k, 150}]

Prog

(Python)
from sympy import harmonic
def A220780(n): return (~(m:=int(harmonic(k:=(n<<1)+(n&1), -k)))&m-1).bit_length() # Chai Wah Wu, Jul 11 2022

Crossrefs

Cf. A001511, A031971, A220779.

Sequence in context: A257495 A120025 A109090 * A323915 A080100 A365425

Adjacent sequences: A220777 A220778 A220779 * A220781 A220782 A220783

Keyword

nonn

Author

Jonathan Sondow, Dec 20 2012

Status

approved