In[]:=
a={{0.,1.,0.},{1.,0.,1.},{0.,1.,0.},{0.,1.,0.},{1.,0.,1.},{0.,1.,0.},{0.,1.,0.},{1.,0.,1.},{0.,1.,0.}}​​c=Flatten[a]​​b=c​​d=Riffle[b,c]​​e=Partition[d,6]​​Image[e]​​Image[a]
Out[]=
{{0.,1.,0.},{1.,0.,1.},{0.,1.,0.},{0.,1.,0.},{1.,0.,1.},{0.,1.,0.},{0.,1.,0.},{1.,0.,1.},{0.,1.,0.}}
Out[]=
{0.,1.,0.,1.,0.,1.,0.,1.,0.,0.,1.,0.,1.,0.,1.,0.,1.,0.,0.,1.,0.,1.,0.,1.,0.,1.,0.}
Out[]=
{0.,1.,0.,1.,0.,1.,0.,1.,0.,0.,1.,0.,1.,0.,1.,0.,1.,0.,0.,1.,0.,1.,0.,1.,0.,1.,0.}
Out[]=
{0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.}
Out[]=
{{0.,0.,1.,1.,0.,0.},{1.,1.,0.,0.,1.,1.},{0.,0.,1.,1.,0.,0.},{0.,0.,1.,1.,0.,0.},{1.,1.,0.,0.,1.,1.},{0.,0.,1.,1.,0.,0.},{0.,0.,1.,1.,0.,0.},{1.,1.,0.,0.,1.,1.},{0.,0.,1.,1.,0.,0.}}
Out[]=
Out[]=
In[]:=
a={{0.,1.,0.},{1.,0.,1.},{0.,1.,0.},{0.,1.,0.},{1.,0.,1.},{0.,1.,0.},{0.,1.,0.},{1.,0.,1.},{0.,1.,0.}}​​c=Flatten[a]​​b=c​​d=Riffle[b,c]​​e=Partition[d,6]​​Image[e]​​Image[a]
Out[]=
{{0.,1.,0.},{1.,0.,1.},{0.,1.,0.},{0.,1.,0.},{1.,0.,1.},{0.,1.,0.},{0.,1.,0.},{1.,0.,1.},{0.,1.,0.}}
Out[]=
{0.,1.,0.,1.,0.,1.,0.,1.,0.,0.,1.,0.,1.,0.,1.,0.,1.,0.,0.,1.,0.,1.,0.,1.,0.,1.,0.}
Out[]=
{0.,1.,0.,1.,0.,1.,0.,1.,0.,0.,1.,0.,1.,0.,1.,0.,1.,0.,0.,1.,0.,1.,0.,1.,0.,1.,0.}
Out[]=
{0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.,1.,1.,0.,0.}
Out[]=
{{0.,0.,1.,1.,0.,0.},{1.,1.,0.,0.,1.,1.},{0.,0.,1.,1.,0.,0.},{0.,0.,1.,1.,0.,0.},{1.,1.,0.,0.,1.,1.},{0.,0.,1.,1.,0.,0.},{0.,0.,1.,1.,0.,0.},{1.,1.,0.,0.,1.,1.},{0.,0.,1.,1.,0.,0.}}
Out[]=
Out[]=