Select[Range[0,1000],GroupQ[ToFARule[#,{3,2}]]&]
{}
6^6
46656
groups32=Select[Range[0,6^6-1],GroupQ[ToFARule[#,{3,2}]]&];
Length[groups32]
5832
Show[GraphicsArray[Partition[RasterGraphics[FAEvolveList[ToFARule[#,{3,2}],2,Table[0,{40}],30],#]&/@Take[groups32,100],8]]];
Show[RasterGraphics[FAEvolveList[ToFARule[1508,{3,2}],2,Table[0,{40}],300]]];
Show[GraphicsArray[Partition[RasterGraphics[FAEvolveList[ToFARule[#,{3,2}],2,Table[0,{40}],30],#]&/@Take[groups32,{2000,2100}],8]]];
Show[RasterGraphics[FAEvolveList[ToFARule[17238,{3,2}],2,Table[0,{400}],300]]];
Show[RasterGraphics[FAEvolveList[ToFARule[17238,{3,2}],1,Table[0,{400}],300]]];
Show[RasterGraphics[FAEvolveList[ToFARule[17238,{3,2}],3,Table[0,{400}],300]]];