cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-6 of 6 results.

A256531 First differences of A256530.

Original entry on oeis.org

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

Views

Author

Omar E. Pol, Apr 21 2015

Keywords

Comments

Number of cells turned ON at n-th stage of cellular automaton of A256530.
Similar to A261695 which shares infinitely many terms.

Examples

			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.
		

Crossrefs

Programs

  • 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 *)

A160410 Number of "ON" cells at n-th stage in simple 2-dimensional cellular automaton (see Comments for precise definition).

Original entry on oeis.org

0, 4, 16, 28, 64, 76, 112, 148, 256, 268, 304, 340, 448, 484, 592, 700, 1024, 1036, 1072, 1108, 1216, 1252, 1360, 1468, 1792, 1828, 1936, 2044, 2368, 2476, 2800, 3124, 4096, 4108, 4144, 4180, 4288, 4324, 4432, 4540, 4864, 4900, 5008, 5116, 5440, 5548, 5872, 6196
Offset: 0

Views

Author

Omar E. Pol, May 20 2009

Keywords

Comments

On the infinite square grid, we consider cells to be the squares, and we start at round 0 with all cells in the OFF state, so a(0) = 0.
At round 1, we turn ON four cells, forming a square.
The rule for n > 1: A cell in turned ON iff exactly one of its four vertices is a corner vertex of the set of ON cells. So in each generation every exposed vertex turns on three new cells.
Therefore:
At Round 2, we turn ON twelve cells around the square.
At round 3, we turn ON twelve other cells. Three cells around of every corner of the square.
And so on.
For the first differences see the entry A161411.
Shows a fractal behavior similar to the toothpick sequence A139250.
A very similar sequence is A160414, which uses the same rule but with a(1) = 1, not 4.
When n=2^k then the polygon formed by ON cells is a square with side length 2^(k+1).
a(n) is also the area of the figure of A147562 after n generations if A147562 is drawn as overlapping squares. - Omar E. Pol, Nov 08 2009
From Omar E. Pol, Mar 28 2011: (Start)
Also, toothpick sequence starting with four toothpicks centered at (0,0) as a cross.
Rule: Each exposed endpoint of the toothpicks of the old generation must be touched by the endpoints of three toothpicks of new generation. (Note that these three toothpicks looks like a T-toothpick, see A160172.)
The sequence gives the number of toothpicks after n stages. A161411 gives the number of toothpicks added at the n-th stage.
(End)

Examples

			From _Omar E. Pol_, Sep 24 2015: (Start)
With the positive terms written as an irregular triangle in which the row lengths are the terms of A011782 the sequence begins:
    4;
   16;
   28,  64;
   76, 112, 148, 256;
  268, 304, 340, 448, 484, 592, 700, 1024;
  ...
Right border gives the elements of A000302 greater than 1.
This triangle T(n,k) shares with the triangle A256534 the terms of the column k, if k is a power of 2, for example, both triangles share the following terms: 4, 16, 28, 64, 76, 112, 256, 268, 304, 448, 1024, etc.
.
Illustration of initial terms, for n = 1..10:
.       _ _ _ _                         _ _ _ _
.      |  _ _  |                       |  _ _  |
.      | |  _|_|_ _ _ _ _ _ _ _ _ _ _ _|_|_  | |
.      | |_|  _ _     _ _     _ _     _ _  |_| |
.      |_ _| |  _|_ _|_  |   |  _|_ _|_  | |_ _|
.          | |_|  _ _  |_|   |_|  _ _  |_| |
.          |   | |  _|_|_ _ _ _|_|_  | |   |
.          |  _| |_|  _ _     _ _  |_| |_  |
.          | | |_ _| |  _|_ _|_  | |_ _| | |
.          | |_ _| | |_|  _ _  |_| | |_ _| |
.          |       |   | |   | |   |       |
.          |  _ _  |  _| |_ _| |_  |  _ _  |
.          | |  _|_| | |_ _ _ _| | |_|_  | |
.          | |_|  _| |_ _|   |_ _| |_  |_| |
.          |   | | |_ _ _ _ _ _ _ _| | |   |
.          |  _| |_ _| |_     _| |_ _| |_  |
.       _ _| | |_ _ _ _| |   | |_ _ _ _| | |_ _
.      |  _| |_ _|   |_ _|   |_ _|   |_ _| |_  |
.      | | |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _| | |
.      | |_ _| |                       | |_ _| |
.      |_ _ _ _|                       |_ _ _ _|
.
After 10 generations there are 304 ON cells, so a(10) = 304.
(End)
		

Crossrefs

Programs

  • Mathematica
    RasterGraphics[state_?MatrixQ,colors_Integer:2,opts___]:=
    Graphics[Raster[Reverse[1-state/(colors -1)]],
    AspectRatio ->(AspectRatio/.{opts}/.AspectRatio ->Automatic),
    Frame ->True, FrameTicks ->None, GridLines ->None];
    rule=1340761804646523638425234105559798690663900360577570370705802859623\
    705267234688669629039040624964794287326910250673678735142700520276191850\
    5902735959769690
    Show[GraphicsArray[Map[RasterGraphics,CellularAutomaton[{rule, {2,
    {{4,2,1}, {32,16,8}, {256,128,64}}}, {1,1}}, {{{1,1}, {1,1}}, 0}, 9,-10]]]];
    ca=CellularAutomaton[{rule,{2,{{4,2,1},{32,16,8},{256,128,64}}},{1,
    1}},{{{1,1},{1,1}},0},99,-100];
    Table[Total[ca[[i]],2],{i,1,Length[ca]}]
    (* John W. Layman, Sep 01 2009; Sep 02 2009 *)
    a[n_] := 4*Sum[3^DigitCount[k, 2, 1], {k, 0, n-1}];
    Table[a[n], {n, 0, 50}] (* Jean-François Alcover, Nov 17 2017, after N. J. A. Sloane *)
  • PARI
    A160410(n)=sum(i=0,n-1,3^norml2(binary(i)))<<2 \\ M. F. Hasler, Dec 04 2012

Formula

Equals 4*A130665. This provides an explicit formula for a(n). - N. J. A. Sloane, Jul 13 2009
a(2^k) = (2*(2^k))^2 for k>=0.

Extensions

Edited by David Applegate and N. J. A. Sloane, Jul 13 2009

A160414 Number of "ON" cells at n-th stage in simple 2-dimensional cellular automaton (same as A160410, but a(1) = 1, not 4).

Original entry on oeis.org

0, 1, 9, 21, 49, 61, 97, 133, 225, 237, 273, 309, 417, 453, 561, 669, 961, 973, 1009, 1045, 1153, 1189, 1297, 1405, 1729, 1765, 1873, 1981, 2305, 2413, 2737, 3061, 3969, 3981, 4017, 4053, 4161, 4197, 4305, 4413, 4737, 4773, 4881, 4989, 5313, 5421, 5745
Offset: 0

Views

Author

Omar E. Pol, May 20 2009

Keywords

Comments

The structure has a fractal behavior similar to the toothpick sequence A139250.
First differences: A161415, where there is an explicit formula for the n-th term.
For the illustration of a(24) = 1729 (the Hardy-Ramanujan number) see the Links section.

Examples

			From _Omar E. Pol_, Sep 24 2015: (Start)
With the positive terms written as an irregular triangle in which the row lengths are the terms of A011782 the sequence begins:
1;
9;
21,    49;
61,    97,  133,  225;
237,  273,  309,  417,  453, 561,  669,  961;
...
Right border gives A060867.
This triangle T(n,k) shares with the triangle A256530 the terms of the column k, if k is a power of 2, for example both triangles share the following terms: 1, 9, 21, 49, 61, 97, 225, 237, 273, 417, 961, etc.
.
Illustration of initial terms, for n = 1..10:
.       _ _ _ _                       _ _ _ _
.      |  _ _  |                     |  _ _  |
.      | |  _|_|_ _ _ _ _ _ _ _ _ _ _|_|_  | |
.      | |_|  _ _     _ _   _ _     _ _  |_| |
.      |_ _| |  _|_ _|_  | |  _|_ _|_  | |_ _|
.          | |_|  _ _  |_| |_|  _ _  |_| |
.          |   | |  _|_|_ _ _|_|_  | |   |
.          |  _| |_|  _ _   _ _  |_| |_  |
.          | | |_ _| |  _|_|_  | |_ _| | |
.          | |_ _| | |_|  _  |_| | |_ _| |
.          |  _ _  |  _| |_| |_  |  _ _  |
.          | |  _|_| | |_ _ _| | |_|_  | |
.          | |_|  _| |_ _| |_ _| |_  |_| |
.          |   | | |_ _ _ _ _ _ _| | |   |
.          |  _| |_ _| |_   _| |_ _| |_  |
.       _ _| | |_ _ _ _| | | |_ _ _ _| | |_ _
.      |  _| |_ _|   |_ _| |_ _|   |_ _| |_  |
.      | | |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _| | |
.      | |_ _| |                     | |_ _| |
.      |_ _ _ _|                     |_ _ _ _|
.
After 10 generations there are 273 ON cells, so a(10) = 273.
(End)
		

Crossrefs

Programs

  • Maple
    read("transforms") ; isA000079 := proc(n) if type(n,'even') then nops(numtheory[factorset](n)) = 1 ; else false ; fi ; end proc:
    A048883 := proc(n) 3^wt(n) ; end proc:
    A161415 := proc(n) if n = 1 then 1; elif isA000079(n) then 4*A048883(n-1)-2*n ; else 4*A048883(n-1) ; end if; end proc:
    A160414 := proc(n) add( A161415(k),k=1..n) ; end proc: seq(A160414(n),n=0..90) ; # R. J. Mathar, Oct 16 2010
  • Mathematica
    A160414list[nmax_]:=Accumulate[Table[If[n<2,n,4*3^DigitCount[n-1,2,1]-If[IntegerQ[Log2[n]],2n,0]],{n,0,nmax}]];A160414list[100] (* Paolo Xausa, Sep 01 2023, after R. J. Mathar *)
  • PARI
    my(s=-1, t(n)=3^norml2(binary(n-1))-if(n==(1<Altug Alkan, Sep 25 2015

Formula

a(n) = 1 + 4*A219954(n), n >= 1. - M. F. Hasler, Dec 02 2012
a(2^k) = (2^(k+1) - 1)^2. - Omar E. Pol, Jan 05 2013

Extensions

Edited by N. J. A. Sloane, Jun 15 2009 and Jul 13 2009
More terms from R. J. Mathar, Oct 16 2010

A256534 Number of ON cells at n-th stage in simple 2-dimensional cellular automaton (see Comments lines for definition).

Original entry on oeis.org

0, 4, 16, 28, 64, 76, 112, 172, 256, 268, 304, 364, 448, 556, 688, 844, 1024, 1036, 1072, 1132, 1216, 1324, 1456, 1612, 1792, 1996, 2224, 2476, 2752, 3052, 3376, 3724, 4096, 4108, 4144, 4204, 4288, 4396, 4528, 4684, 4864, 5068, 5296, 5548, 5824, 6124, 6448, 6796, 7168, 7564, 7984, 8428, 8896, 9388, 9904, 10444, 11008
Offset: 0

Views

Author

Omar E. Pol, Apr 22 2015

Keywords

Comments

On the infinite square grid at stage 0 there are no ON cells, so a(0) = 0.
At stage 1, four cells are turned ON forming a square, so a(1) = 4.
If n is a power of 2 so the structure is a square of side length 2n that contains (2n)^2 ON cells.
The structure grows by the four corners as square waves forming layers of ON cells up the next square structure, and so on (see example).
Has the same rules as A256530 but here a(1) = 4 not 1.
Has a smoother behavior than A160410 with which shares infinitely many terms (see example).
A261695, the first differences, gives the number of cells turned ON at n-th stage.

Examples

			With the positive terms written as an irregular triangle in which the row lengths are the terms of A011782 the sequence begins:
4;
16;
28,     64;
76,    112,  172,  256;
268,   304,  364,  448,  556,  688,  844, 1024;
...
Right border gives the elements of A000302 greater than 1.
This triangle T(n,k) shares with the triangle A160410 the terms of the column k, if k is a power of 2, for example, both triangles share the following terms: 4, 16, 28, 64, 76, 112, 256, 268, 304, 448, 1024, etc.
.
Illustration of initial terms, for n = 1..10:
.       _ _ _ _                         _ _ _ _
.      |  _ _  |                       |  _ _  |
.      | |  _|_|_ _ _ _ _ _ _ _ _ _ _ _|_|_  | |
.      | |_|  _ _ _ _ _ _     _ _ _ _ _ _  |_| |
.      |_ _| |  _ _ _ _  |   |  _ _ _ _  | |_ _|
.          | | |  _ _  | |   | |  _ _  | | |
.          | | | |  _|_|_|_ _|_|_|_  | | | |
.          | | | |_|  _ _     _ _  |_| | | |
.          | | |_ _| |  _|_ _|_  | |_ _| | |
.          | |_ _ _| |_|  _ _  |_| |_ _ _| |
.          |       |   | |   | |   |       |
.          |  _ _ _|  _| |_ _| |_  |_ _ _  |
.          | |  _ _| | |_ _ _ _| | |_ _  | |
.          | | |  _| |_ _|   |_ _| |_  | | |
.          | | | | |_ _ _ _ _ _ _ _| | | | |
.          | | | |_ _| | |   | | |_ _| | | |
.       _ _| | |_ _ _ _| |   | |_ _ _ _| | |_ _
.      |  _| |_ _ _ _ _ _|   |_ _ _ _ _ _| |_  |
.      | | |_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _| | |
.      | |_ _| |                       | |_ _| |
.      |_ _ _ _|                       |_ _ _ _|
.
After 10 generations there are 304 ON cells, so a(10) = 304.
		

Crossrefs

Programs

  • Mathematica
    {0}~Join~Flatten@ Table[4^i + 3 (2 j)^2, {i, 6}, {j, 0, 2^(i - 1) - 1}] (* Michael De Vlieger, Nov 03 2022 *)

Formula

For i = 1 to z: for j = 0 to 2^(i-1)-1: n = n+1: a(n) = 4^i + 3*(2*j)^2: next j: next i
It appears that a(n) = 4 * A236305(n-1), n >= 1.

A350632 a(n) is the total number of ON cells at stage n of a cellular automaton where cells are turned ON when they have one or two neighbors ON (see Comments for precise definition).

Original entry on oeis.org

0, 1, 9, 21, 45, 57, 85, 121, 177, 189, 217, 253, 329, 373, 465, 557, 721, 737, 765, 801, 877, 921, 1013, 1105, 1301, 1377, 1485, 1601, 1805, 1985, 2221, 2449, 2873, 2909, 2937, 2973, 3049, 3093, 3185, 3277, 3473, 3549, 3657, 3773, 3977, 4157, 4393, 4621, 5113
Offset: 0

Views

Author

Rémy Sigrist, Jan 08 2022

Keywords

Comments

On the infinite square grid, start with all cells OFF.
Turn a single cell to the ON state.
At each subsequent step, each cell with exactly one or two neighbors ON is turned ON, and everything that is already ON remains ON.
Here "neighbor" refers to the eight adjacent and diagonally adjacent cells in the Moore neighborhood.

Examples

			The first 5 generations can be depicted as follows:
         . . . . . . . . . . .
         . 5 5 . . . . . 5 5 .
         . 5 4 4 4 4 4 4 4 5 .
         . . 4 3 3 . 3 3 4 . .
         . . 4 3 2 2 2 3 4 . .
         . . 4 . 2 1 2 . 4 . .
         . . 4 3 2 2 2 3 4 . .
         . . 4 3 3 . 3 3 4 . .
         . 5 4 4 4 4 4 4 4 5 .
         . 5 5 . . . . . 5 5 .
         . . . . . . . . . . .
- so a(0) = 0,
     a(1) = 0 + 1 = 1,
     a(2) = 1 + 8 = 9,
     a(3) = 9 + 12 = 21,
     a(4) = 21 + 24 = 45,
     a(5) = 45 + 12 = 57.
		

Crossrefs

A262609 Divisors of 1728.

Original entry on oeis.org

1, 2, 3, 4, 6, 8, 9, 12, 16, 18, 24, 27, 32, 36, 48, 54, 64, 72, 96, 108, 144, 192, 216, 288, 432, 576, 864, 1728
Offset: 1

Views

Author

Omar E. Pol, Nov 20 2015

Keywords

Comments

A000578(12) = 1728 is the cube of 12.
The number of divisors of 1728 is A000005(1728) = 28.
The sum of the divisors of 1728 is A000203(1728) = 5080.
The prime factorization of 1728 is 2^6 * 3^3.
1728 + 1 = A001235(1) = A011541(2) = 1729 is the Hardy-Ramanujan number.
Three examples related to cellular automata:
1728 is also the number of ON cells after 32 generations of the cellular automata A160239 and A253088.
1728 is also the total number of ON cells around the central ON cell after 24 generations of the cellular automata A160414 and A256530.
1728 is also the total number of ON cells around the central ON cell after 43 generations of the cellular automata A160172 and A255366.

Examples

			a(3) * a(26) = 3 * 576 = 1728.
a(4) * a(25) = 4 * 432 = 1728.
a(5) * a(24) = 6 * 288 = 1728.
		

Crossrefs

Programs

  • Mathematica
    Divisors[1728]
  • PARI
    divisors(1728)
  • Sage
    divisors(1728);
    
Showing 1-6 of 6 results.