You are using a browser not supported by the Wolfram Cloud
Supported browsers include recent versions of Chrome, Edge, Firefox and Safari.
I understand and wish to continue anyway »
WOLFRAM NOTEBOOK
In[]:=
EnumerateWolframModelRules[{{1,2}}{{2,2}}]
Out[]=
(For 1knk rules, up to a k-term linear recurrence may be involved.)
(For rules, up to a k-term linear recurrence may be involved.)
1
k
n
k
In[]:=
ParallelMapMonitored[FindLinearRecurrence[(WolframModelTest[#,Automatic]["Sizes"])]&,EnumerateWolframModelRules[{{1,2}}{{2,2}}]]
Out[]=
In[]:=
ParallelMapMonitored[FindLinearRecurrence[(WolframModelTest[#,Automatic]["Sizes"])]&,EnumerateWolframModelRules[{{1,2}}{{3,2}}]]
Out[]=
In[]:=
ParallelMapMonitored[FindLinearRecurrence[(WolframModelTest[#,Automatic]["Sizes"])]&,EnumerateWolframModelRules[{{1,3}}{{2,3}}]]
Out[]=
In[]:=
Length/@%//Counts
Out[]=
18044,21293,336