{{1,3}}{{2,3},{1,2}}

{{1,3}}{{2,3},{1,2}}
In[]:=
ImageCollectionFromRules[Table[RandomWolframModel[{{1,3}}{{2,3},{1,2}}],100],{{0,0,0}}];
In[]:=
Length[%]
Out[]=
12
In[]:=
MakeFSP[%%]
Out[]=
In[]:=
PicturesFromRules[{{{1,2,3}}{{1,3,4},{2,3,5},{2,3}}},{{0,0,0}}]
Out[]=
In[]:=
ImageCollectionFromRules[Table[RandomWolframModel[{{1,3}}{{2,3},{1,2}}],500],{{0,0,0}}];
In[]:=
Length[%]
Out[]=
37
In[]:=
MakeFSP[%%]
Out[]=
In[]:=
PicturesFromRules[{{{1,2,3}}{{3,4,1},{4,2,5},{4,3}}},{{0,0,0}}]
Out[]=
NOTE: Mysterious hanging when running this; had to restart

{{1,3},{1,2}}{{1,3},{2,2}}

In[]:=
est[{{1,3},{1,2}}{{1,3},{2,2}}]
Out[]=
4213597
2
In[]:=
N[%]
Out[]=
2.1068×
6
10
In[]:=
ImageCollectionFromRules[Table[RandomWolframModel[{{1,3},{1,2}}{{1,3},{2,2}}],500],{{0,0,0},{0,0}}];
In[]:=
Length[%]
Out[]=
1
In[]:=
MakeFSP[%%]
Out[]=

{{1,3},{1,2}}{{2,3},{2,2}}

{{1,3},{2,2}}{{2,3},{2,2}}

{{1,3},{1,1},{1,1}}{{2,3},{2,2},{2,1}}