A364774 a(n) is the periodic part (converted to base 10) on the n-th diagonal from the right of rule-30 1-D cellular automaton, when started from a single ON cell.

1, 2, 2, 12, 180, 168, 42840, 3400480080, 3127563600, 12444951686140307040, 12370448552746640800, 14616061688484808000, 13063440952988449472, 12291672850370833024, 11994012329620187776, 270303456443855225105637298999007589120, 84431359962367713768426673527546762857531371484724067759478650915353749433600

Offset

1,2

Comments

See A364773 for comments and links.

Links

Paolo Xausa, Table of n, a(n) for n = 1..29

Mathematica

A364774list[steps_]:=Module[{d=2Ceiling[Log2[steps]], ca, n=1, p, plen, a={1}}, ca=CellularAutomaton[30, {{1}, 0}, {steps, {1-d, steps}}]; While[++n<=2(d-1)&&(plen=Length[p=FindRepeat[Flatten[Rest[Split[Diagonal[ca, d-n]]]]]])>=IntegerLength[Last[a]]&&IntegerQ[Log2[plen]], AppendTo[a, FromDigits[p, 2]]]; a];
A364774list[300] (* Analyzes 300 evolution steps *)

Crossrefs

Cf. A070950, A094605 (periods), A363343 (diagonals), A364773 (base 2).

Sequence in context: A003090 A032152 A032057 * A130718 A268528 A173331

Adjacent sequences: A364771 A364772 A364773 * A364775 A364776 A364777

Keyword

nonn,base

Author

Paolo Xausa, Aug 06 2023

Status

approved