|
|
A037239
|
|
Numerator of Pi^(2n)/(GAMMA(2n)*(1-2^(-2n))*Zeta(2n)); = 8*(highest power of 2 dividing n).
|
|
2
|
|
|
8, 16, 8, 32, 8, 16, 8, 64, 8, 16, 8, 32, 8, 16, 8, 128, 8, 16, 8, 32, 8, 16, 8, 64, 8, 16, 8, 32, 8, 16, 8, 256, 8, 16, 8, 32, 8, 16, 8, 64, 8, 16, 8, 32, 8, 16, 8, 128, 8, 16, 8, 32, 8, 16, 8, 64, 8, 16, 8, 32, 8, 16, 8, 512, 8, 16, 8, 32, 8, 16, 8, 64, 8
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
with(numtheory): for n from 1 to 200 do if n mod 2 = 1 then printf(`%d, `, 8) else printf(`%d, `, 8*2^ifactors(n)[2][1][2]) fi; od:
seq(2^(3+padic[ordp](n, 2)), n=1..73); # Peter Luschny, Apr 03 2014
|
|
MATHEMATICA
|
|
|
PROG
|
(PARI) a(n)=if(n<1, 0, 8*2^valuation(n, 2))
(Magma) [2^(3 + Valuation(n, 2)): n in [1..80]]; // G. C. Greubel, Nov 01 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,frac,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|