1,2 1,2
1,2 1,2
In[]:=
EnumerateWolframModelRules[{{1,2}}{{1,2}}]
Out[]=
In[]:=
EvolutionPicture2[#,Table[{i,i+1},{i,10}],5]&/@%
Out[]=
In[]:=
InteractiveListSelectorSW[WolframModel[#,Table[{i,i+1},{i,10}],10,"LayeredCausalGraph"]#&/@%113]
Out[]=
In[]:=
FinalPicture2[#,Table[{0,0},{i,10}],5]&/@%113
Out[]=
In[]:=
InteractiveListSelectorSW[WolframModel[#,Table[{0,0},{i,10}],10,"LayeredCausalGraph"]#&/@%113]
Out[]=
In[]:=
InteractiveListSelectorSW[WolframModel[#,Append[Table[{i,i+1},{i,10}],{5,5}],10,"LayeredCausalGraph"]#&/@%113]
Out[]=
In[]:=
InteractiveListSelectorSW[FinalPicture2[#,Append[Table[{i,i+1},{i,10}],{5,5}],10]#&/@%113]
Out[]=
In[]:=
InteractiveListSelectorSW[FinalPicture2[#,Table[{i,Mod[i+1,21]},{i,0,20}],20]#&/@%113]
Out[]=
In[]:=
InteractiveListSelectorSW[FinalPicture2[#,Append[Table[{i,Mod[i+1,21]},{i,0,20}],{0,0}],20]#&/@%113]
Out[]=
1,3 1,3
1,3 1,3
Also consider multiple same-size rules? [ CA behavior]
Also consider multiple same-size rules? [ CA behavior]
2,2 2,2
2,2 2,2