In[]:=
With[{data=CellularAutomaton[{10,{2,1},2},RandomInteger[1,10^6],{{{200}}}]},Table[Length[Counts[Partition[data,n,1]]],{n,20}]]
Out[]=
{2,4,8,16,32,64,128,256,512,1024,2048,4096,8192,16384,32768,65531,130711,251147,425819,611115}
In[]:=
Log[2,%]
Out[]=
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,,,,,
Log[65531]
Log[2]
Log[130711]
Log[2]
Log[251147]
Log[2]
Log[425819]
Log[2]
Log[611115]
Log[2]
In[]:=
N[%]
Out[]=
{1.,2.,3.,4.,5.,6.,7.,8.,9.,10.,11.,12.,13.,14.,15.,15.9999,16.996,17.9382,18.6999,19.2211}
In[]:=
With[{data=CellularAutomaton[{10,{2,1},2},RandomInteger[1,10^6],{{{200}}}]},Table[Length[Counts[Partition[data,n,1]]],{n,20}]]
Out[]=
{2,4,8,16,32,64,128,256,512,1024,2048,4096,8192,16384,32768,65536,130739,251248,426388,612177}
In[]:=
Log[2,%]
Out[]=
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,,,,
Log[130739]
Log[2]
Log[251248]
Log[2]
Log[426388]
Log[2]
Log[612177]
Log[2]
In[]:=
With[{data=CellularAutomaton[{10,{2,1},2},RandomInteger[1,10000],{{{1}}}]},Table[Length[Counts[Partition[data,n,1]]],{n,20}]]
Out[]=
{2,4,8,16,32,64,128,256,512,1021,2019,3657,5561,7254,8420,9141,9544,9752,9860,9916}
In[]:=
Length[%]
Out[]=
32
1980s code:
1980s code:
Enter option : 3Enter 1 for debug messages, 0 otherwise : 0Enter hashsize for sparse f array; 0 otherwise : 0Enter number of time steps (default:1) : 1Enter number of states per site (k) : 2Enter scope (1 for nearest neighbours) : 2Enter 0 to give numerical code; 1 to read explicit f[n] : 0Numerical code (<=64) : 10Summary to length 2: Number of configurations under consideration: 1 Number of distinct f values found so far: 3 (out of 65535)Summary to length 3: Number of configurations under consideration: 2 Number of distinct f values found so far: 5 (out of 65535)Summary to length 4: Number of configurations under consideration: 4 Number of distinct f values found so far: 9 (out of 65535)Summary to length 5: Number of configurations under consideration: 8 Number of distinct f values found so far: 17 (out of 65535)Summary to length 6: Number of configurations under consideration: 15 Number of distinct f values found so far: 32 (out of 65535)Summary to length 7: Number of configurations under consideration: 25 Number of distinct f values found so far: 57 (out of 65535)Summary to length 8: Number of configurations under consideration: 45 Number of distinct f values found so far: 102 (out of 65535)Summary to length 9: Number of configurations under consideration: 79 Number of distinct f values found so far: 181 (out of 65535)Summary to length 10: Number of configurations under consideration: 138 Number of distinct f values found so far: 319 (out of 65535)Summary to length 11: Number of configurations under consideration: 234 Number of distinct f values found so far: 553 (out of 65535)Summary to length 12: Number of configurations under consideration: 387 Number of distinct f values found so far: 940 (out of 65535)Summary to length 13: Number of configurations under consideration: 607 Number of distinct f values found so far: 1547 (out of 65535)Summary to length 14: Number of configurations under consideration: 944 Number of distinct f values found so far: 2491 (out of 65535)Summary to length 15: Number of configurations under consideration: 1408 Number of distinct f values found so far: 3899 (out of 65535)Summary to length 16: Number of configurations under consideration: 2066 Number of distinct f values found so far: 5965 (out of 65535)Summary to length 17: Number of configurations under consideration: 2807 Number of distinct f values found so far: 8772 (out of 65535)Summary to length 18: Number of configurations under consideration: 3745 Number of distinct f values found so far: 12517 (out of 65535)Summary to length 19: Number of configurations under consideration: 4706 Number of distinct f values found so far: 17223 (out of 65535)Summary to length 20: Number of configurations under consideration: 5584 Number of distinct f values found so far: 22807 (out of 65535)Summary to length 21: Number of configurations under consideration: 6269 Number of distinct f values found so far: 29076 (out of 65535)Summary to length 22: Number of configurations under consideration: 6509 Number of distinct f values found so far: 35585 (out of 65535)Summary to length 23: Number of configurations under consideration: 6486 Number of distinct f values found so far: 42071 (out of 65535)Summary to length 24: Number of configurations under consideration: 5975 Number of distinct f values found so far: 48046 (out of 65535)Summary to length 25: Number of configurations under consideration: 5179 Number of distinct f values found so far: 53225 (out of 65535)Summary to length 26: Number of configurations under consideration: 4232 Number of distinct f values found so far: 57457 (out of 65535)Summary to length 27: Number of configurations under consideration: 3120 Number of distinct f values found so far: 60577 (out of 65535)Summary to length 28: Number of configurations under consideration: 2128 Number of distinct f values found so far: 62705 (out of 65535)Summary to length 29: Number of configurations under consideration: 1302 Number of distinct f values found so far: 64007 (out of 65535)Summary to length 30: Number of configurations under consideration: 787 Number of distinct f values found so far: 64794 (out of 65535)Summary to length 31: Number of configurations under consideration: 419 Number of distinct f values found so far: 65213 (out of 65535)Summary to length 32: Number of configurations under consideration: 195 Number of distinct f values found so far: 65408 (out of 65535)Summary to length 33: Number of configurations under consideration: 91 Number of distinct f values found so far: 65499 (out of 65535)Summary to length 34: Number of configurations under consideration: 25 Number of distinct f values found so far: 65524 (out of 65535)Summary to length 35: Number of configurations under consideration: 10 Number of distinct f values found so far: 65534 (out of 65535)(All f values generated)Configuration with no predecessor of length 36 found.j=1, f=32768Enter 1 to find set f values not generated, 0 otherwise : 1f values not generated : Enter 0 to change rule, 1 to change parameters, 2 to return to main menu : 2Basic options:
Trying
Trying