In[]:=
GraphicsGridPartition​​ResourceFunction["WolframModel"][{{1,2,3}}{{4,4,2},{4,1,3}},​​{{0,0,0}},8]"StatesPlotsList",
,3,Background

Out[]=