Finding Boolean functions
Finding Boolean functions
res=findMinimalRuleArrayFunctions[{7,12},3,20]
In[]:=
Complement[Range[0,255],Flatten[Keys[#Results]&/@res]]
Out[]=
{18,20,22,24,30,33,36,41,70,73,75,86,97,100,101,105,107,109,121,129,134,137,146,148,150,154,158,169,180,182,212,214,222,225,233,237}
[ ??? ]
[ ??? ]
In[]:=
meshseeds=Table[TrainDiamondNet[createDiamondNet[14],trainingData,10,MaxTrainingRounds->10000,BatchSize->20000,TargetDevice->"GPU",RandomSeeding->1000+i],{i,5}];
In[]:=
CloudExport[%,"WXF"]
Rule 30 Search
Rule 30 Search
In[]:=
findMinimalRuleArrayFunctionsSpecificFunction[30,{7,12},3,25]
Out[]=
{Width4,Height8,Results30{{2,2,2,1},{2,2,2,1},{2,2,1,2},{2,1,2,1},{1,2,1,2},{1,2,2,1},{1,2,2,2},{1,2,2,2}}}
In[]:=
NotebookSave[]
In[]:=
$Version
Out[]=
14.1.0 for Linux x86 (64-bit) (July 23, 2024)