显示找到的3个结果中的1-3个。
第页1
1, 1, 6, 11, 18, 12, 5, 22, 91, 143, 1, 93, 370, 182, 20, 20, 315, 332, 973, 157, 1223, 1807, 325, 4044, 7412, 11211, 4600, 2176, 14848, 4659, 3123, 10852, 1678, 20862, 3348
数学
c[_]=0;c[1]=j=1;u=2;s=3;最多@Tally[#][[All,-1]]&@Reap[Do[d=除数[s];k=1;当[c[d[[k]]>0时,k++];集合[k,d[[k]]];集合[c[k],i];如果[k==u,而[c[u]>0,u++]];母猪[u];j=k;s+=k,{i,2,2^12}][[-1,-1]](*迈克尔·德弗利格2022年1月23日*)
黄体脂酮素
(哈斯克尔)
导入数据。列表(组)
a253425 n=a253425列表!!(n-1)
a253425_list=地图长度$组a253415_list
(Python)
从itertools导入islice
从sympy导入除数
bset,l,m,s={1},0,2,3
为True时:
对于除数中的d:
如果d不在bset中:
b设置添加(d)
如果bset中有m:
产量l
l=1
当m在bset中时:
m+=1
其他:
l+=1
s+=d
打破
a(n+1)是(2+前n项的和)的最小除数,但不更早出现;a(1)=1。
+10 13
1, 3, 2, 4, 6, 9, 27, 18, 8, 5, 17, 34, 68, 12, 24, 10, 25, 11, 13, 23, 7, 47, 94, 235, 15, 16, 32, 48, 51, 289, 578, 102, 36, 26, 73, 219, 30, 20, 14, 46, 50, 470, 60, 40, 146, 21, 49, 28, 113, 29, 19, 35, 42, 54, 64, 22, 77, 329, 84, 56, 292, 365, 65, 37, 131, 38, 33
链接
迈克尔·德弗利格,a(n)的带注释对数散点图对于n=1..2^14,用红色表示记录,用蓝色表示局部极小值,用洋红表示素数,用黄金表示素数幂。
数学
c[_]=0;j=c[1]=1;s=3;{j} ~Join~Reap[Do[d=除数[s];k=1;当[c[d[[k]]>0时,k++];集合[k,d[[k]]];集合[c[k],i];母猪[k];j=k;s+=k,{i,2,80}][[-1,-1]](*迈克尔·德弗利格2022年1月23日*)
黄体脂酮素
(哈斯克尔)
导入数据。列表(删除)
a095258 n=a095258_列表!!(n-1)
a095258_list=1:f[2..]1其中
f xs z=g xs,其中
g(y:ys)=如果modz'y>0,则gyselse y:f(删除yxs)(z+y)
z’=z+2
(Python)
从itertools导入islice
从sympy导入除数
b集,s={1},3
产量1
为True时:
对于除数中的d:
如果d不在bset中:
产量d
b设置添加(d)
s+=d
打破
4, 4, 5, 5, 5, 5, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 34, 37, 37, 37, 37, 37
黄体脂酮素
(哈斯克尔)
导入数据。列表(插入)
a253443 n=a253443列表!!(n-4)
a253443_list=f(4,[])6,其中
f(m,ys)z=g$dropWhile(<m)$a027750_row'z,其中
g(d:ds)|元素d ys=g ds
|否则=m:f(ins[m,m+1..](插入d ys))(z+d)
ins(u:us)vs’@(v:vs)=如果u<v,则(u,vs’)else in us vs
搜索在0.006秒内完成
|