|
|
|
|
1, 5, 15, 51, 153, 477, 1431, 4347, 13041, 39285, 117855, 354051, 1062153, 3187917, 9563751, 28695627, 86086881, 258273765, 774821295, 2324503251, 6973509753, 20920647357, 62761942071, 188286180507, 564858541521, 1694576687445, 5083730062335, 15251193375651, 45753580126953, 137260749946797
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
N. J. A. Sloane, On the No. of ON Cells in Cellular Automata, Video of talk in Doron Zeilberger's Experimental Math Seminar at Rutgers University, Feb. 05 2015: Part 1, Part 2
|
|
FORMULA
|
G.f.: (1+3*x)*(1-x) / ((1-3*x)*(1-3*x^2)).
a(n) = 2*3^n - 3^((n-1)/2)/2*(1-(-1)^n+sqrt(3) + (-1)^n*sqrt(3)).
a(n) = 3*a(n-1) + 3*a(n-2) - 9*a(n-3) for n>2.
(End)
|
|
MATHEMATICA
|
A255442[n_] := SeriesCoefficient[(1 + 3*x)*(1 - x)/((1 - 3*x)*(1 - 3*x^2)), {x, 0, n}]; Array[A255442, 30, 0] (* JungHwan Min, Sep 29 2016 *)
A255442L[n_] := CoefficientList[Series[(1 + 3*x)*(1 - x)/((1 - 3*x)*(1 - 3*x^2)), {x, 0, n}], x]; A255442L[29] (* JungHwan Min, Sep 29 2016 *)
|
|
PROG
|
(PARI) Vec((1+3*x)*(1-x) / ((1-3*x)*(1-3*x^2)) + O(x^30)) \\ Colin Barker, Feb 04 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|