%I#16 2015年2月26日16:58:48
%S 3,27,5412919420934137461459485411061314115412861746,
%电话1634188121412246260928893461336634493506424142895066,
%电话:48265381560665955616254760181868069871481269434892187741106611574
%N a(N)是3个非零平方和以N种方式精确求和的最小值。
%C A025427(a(n))=n和A025427-(m)!=对于m<a(n).-_Reinhard Zumkeller,2015年2月26日
%H Donovan Johnson,n的表,n=1..1000的a(n)</a>
%H<a href=“/index/Su#ssq”>为与平方和相关的序列的条目建立索引</a>
%e54是最小的数,有三个非零平方分:54=1+4+49=4+25+25=9+9+36。
%t极限=200;nLst=表[0,{lim^2}];做[n=a^2+b^2+c^2;如果[n>0&&n<lim^2,nLst[[n]]++],{a,lim},{b,a,Sqrt[lim^2-a^2]},};u=并集[nLst];kMax=第一个[补码[1+范围[u[-1]]],u]]-1;表[First[Flatten[Position[nLst,k]],{k,kMax}](T.D.Noe)
%o(哈斯克尔)
%o导入数据。列表(elemIndex);导入数据。也许(来自Just)
%o a025414=来自Just。(`elemIndex`a025427_list)
%o——Reinhard Zumkeller,2015年2月26日
%Y参考A094740(n有一个唯一的划分为三个正方形),A095812(最大数正好有n个划分为三正方形)。
%Y参考A025427。
%K nonn公司
%O 1,1号机组
%A·热心的W·威尔逊_