A234144 a(n) = numerator of Sum_(k=1..n) 1/(2*k - 1)^n.
0, 1, 10, 3527, 123296356, 3115356499043, 1733194364791766081374, 376470435881775086250915790503469, 16952748458548438370767527584555153032, 90548635884513844033505877600764150558334149264809109
Offset: 0
Links
- Robert Israel, Table of n, a(n) for n = 0..35
- Wolfdieter Lang, Theta(k, n), k-family of rational sequences and limits.
Programs
-
Maple
f:= proc(n) local k; numer(add(1/(2*k-1)^n,k=1..n)); end proc: map(f, [$0..10]); # Robert Israel, Nov 05 2023
-
Mathematica
a[n_] := Sum[1/(2*k-1)^n, {k, 1, n}] // Numerator; Table[a[n], {n, 0, 10}]
Comments