|
|
A109241
|
|
Expansion of 1/((1-10*x)*(1-100*x)).
|
|
8
|
|
|
1, 110, 11100, 1111000, 111110000, 11111100000, 1111111000000, 111111110000000, 11111111100000000, 1111111111000000000, 111111111110000000000, 11111111111100000000000, 1111111111111000000000000, 111111111111110000000000000, 11111111111111100000000000000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
a(n) has n+1 1's and n 0's. Partial sums are A109242.
Also the binary representation of the n-th iteration of the elementary cellular automaton starting with a single ON (black) cell for Rules 206 and 238. - Robert Price, Feb 21 2016
|
|
REFERENCES
|
S. Wolfram, A New Kind of Science, Wolfram Media, 2002; p. 55.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = (10^(2n+1) - 10^n)/9.
E.g.f.: (1/9)*(10*exp(100*x) - exp(10*x)). - G. C. Greubel, Aug 01 2017
|
|
MAPLE
|
A109241 := proc(n)(10^(2*n+1)-10^n)/9 ; end proc:
|
|
MATHEMATICA
|
Table[(10^(2*n+1)-10^n)/9, {n, 0, 100}] (* Robert Price, Feb 21 2016 *)
CoefficientList[Series[1/((1 - 100 x) (1 - 10 x)), {x, 0, 33}], x] (* Vincenzo Librandi, Feb 22 2016 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|