WOLFRAM NOTEBOOK

In[]:=
Select[$LifeData,#Class=="Strict still life"&]
Out[]=
BeehiveNameBeehive,Year1969,ClassStrict still life,Wikihttps://conwaylife.com/wiki/Procrastinator,DataFiles{beehive.cells,beehive.rle},MatrixDataSparseArray[Automatic,{3,4},0,{1,{{0,2,4,6},{{2},{3},{1},{4},{2},{3}}},{1,1,1,1,1,1}}],InitialWeight6,
⋯167⋯
,ProfessorNameProfessor,Year2016,ClassStrict still life,Wikihttps://conwaylife.com/wiki/Professor,DataFiles{cismirroredprofessor.cells,cismirroredprofessor.rle},MatrixDataSparseArray[Automatic,{11,9},0,{1,{{0,4,8,14,16,22,28,30,32,38,42,46},{{2},{3},{7},{8},{1},{4},{6},{9},{1},{2},{4},{6},{8},{9},{4},{6},{1},{2},{4},{6},{8},{9},{1},{2},{4},{6},{8},{9},{4},{6},{4},{6},{1},{2},{4},{6},{8},{9},{1},{4},{6},{9},{2},{3},{7},{8}}},{1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1}}],InitialWeight46
Full expression not available
(
original memory size:
417 kB)
In[]:=
Take[Select[$LifeData,#Class=="Spaceship"&],8]//Keys
Out[]=
{Glider,Heavyweight spaceship,Lightweight spaceship,Middleweight spaceship,Ecologist,Schick engine,119P4H1V0,25P3H1V0.1}
In[]:=
ArrayPlot[ArrayPad[#,{1,1}],Mesh->True,MeshStyle->Opacity[.2],ImageSize->50]&/@CellularAutomaton["GameOfLife",{$LifeData[#]["MatrixData"],0},5]&/@%326
Out[]=
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
,
In[]:=
Take[%301,9]//Keys
Out[]=
{Beehive,Block,Loaf,Aircraft carrier,Barge,Boat,Long barge,Long boat,Long ship}
In[]:=
Keys[%302]
Out[]=
{Beehive,Block,Loaf,Aircraft carrier,Barge,Boat}
In[]:=
GraphicsGrid[Map[CellularAutomatonCompositePlot[#,{"Static"->50,{"3D",6}->30}]&,Transpose@{{"Block","Beehive","Loaf"},{"Aircraft carrier","Barge","Boat"}},{2}],Dividers->{False,All},FrameStyle->Opacity[.3]]
Out[]=
In[]:=
GraphicsRow[{Grid[CellularAutomatonCompositePlot[#,{{"Trails",10,.9}->{Automatic,60},{"3D",6}->{60,60}},1]&/@{"Block","Beehive","Loaf"},Dividers->{False,All},FrameStyle->Opacity[.3],Spacings->{2->2.5,2.5}],Grid[CellularAutomatonCompositePlot[#,{"Static"->{60,60},{"3D",6}->{60,60}},1]&/@{"Aircraft carrier","Barge","Boat"},Dividers->{False,All},FrameStyle->Opacity[.3],Spacings->{{4,{2->5,3->5}},2.5}]},Spacings->{40,Automatic}]
Out[]=
]
In[]:=
$LifeData["Pi ship 1"]
Out[]=
In[]:=
CellularAutomatonHistoryPlot["GameOfLife",{Reverse/@Transpose[$LifeData["Pi ship 1"]["MatrixData"]],0},500,"Decay"->.97]
Out[]=
In[]:=
CellularAutomatonHistoryPlot["GameOfLife",{Reverse/@Transpose[$LifeData["Pi ship 1"]["MatrixData"]],0},700,"Decay"->.97]
Out[]=
In[]:=
CellularAutomatonHistoryPlot["GameOfLife",{Reverse/@Transpose[$LifeData["Breeder 1"]["MatrixData"]],0},500,"Decay"->.97]
Out[]=

Long Lifetimes

Prime Generator

Data Import

Modern Cases

Oscillators

Constructions

glider (G)
LWSS (L)
MWSS (M)
Herschel (H)
B-heptomino (B)
R-pentomino (R)
pi-heptomino (P)
queen bee shuttle (Q)
century or bookend (C)
dove (D)
two-glider octomino (O)
U-turner (U)
Blonk-tie (J)
I-heptomino (I)
wing (W)

Modularity Graphs

Oscillators

Modularity

Modularity Index Plot

Gliders & Spaceships

Wolfram Cloud

You are using a browser not supported by the Wolfram Cloud

Supported browsers include recent versions of Chrome, Edge, Firefox and Safari.


I understand and wish to continue anyway »

You are using a browser not supported by the Wolfram Cloud. Supported browsers include recent versions of Chrome, Edge, Firefox and Safari.