A256531 First differences of A256530.

0, 1, 8, 12, 28, 12, 36, 60, 68, 12, 36, 60, 84, 108, 132, 156, 148, 12, 36, 60, 84, 108, 132, 156, 180, 204, 228, 252, 276, 300, 324, 348, 308, 12, 36, 60, 84, 108, 132, 156, 180, 204, 228, 252, 276, 300, 324, 348, 372, 396, 420, 444, 468, 492, 516, 540, 564, 588, 612, 636, 660, 684, 708, 732, 628, 12, 36, 60, 84, 108

Offset

0,3

Comments

Number of cells turned ON at n-th stage of cellular automaton of A256530.

Similar to A261695 which shares infinitely many terms.

Links

Paolo Xausa, Table of n, a(n) for n = 0..8191

N. J. A. Sloane, Catalog of Toothpick and Cellular Automata Sequences in the OEIS

Index entries for sequences related to cellular automata

Example

With the positive terms written as an irregular triangle in which the row lengths are the terms of A011782 the sequence begins:
1;
8;
12, 28;
12, 36, 60, 68;
12, 36, 60, 84, 108, 132, 156, 148;
12, 36, 60, 84, 108, 132, 156, 180, 204, 228, 252, 276, 300, 324, 348, 308;
...
The terms of the rows that start with 12 are also the initial terms of A073762, except the last term of every row, hence rows converge to A073762.

Mathematica

With[{z=7}, Differences[Join[{0, 0}, Flatten[Array[(2^#-1)^2+12Range[0, 2^(#-1)-1]^2&, z]]]]] (* Generates 2^z terms *) (* Paolo Xausa, Nov 15 2023, after Omar E. Pol *)

Prog

(GW-BASIC) 10' a256531 First 2^z-1 positive terms: 20 z=6: defdbl a: for i=1 to z: for j=0 to 2^(i-1)-1: n=n+1: a(n)=(2^i-1)^2 + 3*(2*j)^2: print a(n)-a(n-1); : next j: next i: end

Crossrefs

Cf. A011782, A073762, A139251, A147582, A161411, A161415, A256530, A261695.

Sequence in context: A218558 A181735 A161415 * A117802 A083485 A217156

Adjacent sequences: A256528 A256529 A256530 * A256532 A256533 A256534

Keyword

nonn,tabf

Author

Omar E. Pol, Apr 21 2015

Status

approved