|
Search: id:A082392
|
|
|
| A082392 |
|
Expansion of (1/x) * sum(k>=0, x^2^k/(1-2x^2^(k+1))). |
|
+0
2
|
|
| 1, 1, 2, 1, 4, 2, 8, 1, 16, 4, 32, 2, 64, 8, 128, 1, 256, 16, 512, 4, 1024, 32, 2048, 2, 4096, 64, 8192, 8, 16384, 128, 32768, 1, 65536, 256, 131072, 16, 262144, 512, 524288, 4, 1048576, 1024, 2097152, 32, 4194304, 2048, 8388608, 2, 16777216
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
COMMENT
|
a(n) = 2^A025480(n) = 2^(A003602(n)-1).
|
|
LINKS
|
R. Stephan, Some divide-and-conquer sequences ...
R. Stephan, Table of generating functions
|
|
FORMULA
|
a(0) = 1, a(2n) = 2^n, a(2n+1) = a(n).
|
|
PROGRAM
|
(PARI) for(n=1, 100, l=ceil(log(n)/log(2)):t=polcoeff(sum(k=0, l, (x^2^k)/(1-2*x^2^(k+1))), n):print1(t", "))
|
|
CROSSREFS
|
Cf. A045654.
Sequence in context: A101707 A113418 A117000 this_sequence A085086 A135530 A137206
Adjacent sequences: A082389 A082390 A082391 this_sequence A082393 A082394 A082395
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
Ralf Stephan (ralf(AT)ark.in-berlin.de), Jun 07 2003
|
|
|
Search completed in 0.002 seconds
|
