%I#12 2023年4月14日11:36:16
%S 1,2,3,4,5,6,8,10,12,16,19,22,28,32,34,40,43,47,51,53,56,67,60,63,64,
%电话65,69,75,77,79,80,84,86,98,99102105107119129130141143146,
%电话:150162170182188200221422022623224024825226264268282294310323303436362
%N A360179中的记录。
%H Michael De Vlieger,n表,n=1..8238的a(n)</a>
%H Michael De Vlieger,<a href=“/A362127/A362127.png”>m=A360179(n)的标记散点图</a>,n=1..512。记录,这个序列的术语,以红色显示,局部极小值以蓝色显示,术语紧跟在新m之后以金色显示,而现有m之后以绿色显示。青色线表示a(1..n)以外的最小数字u,它不是序列本身的特征。洋红线表示“盛行低”L(n),并不是序列本身的特征。
%t nn=10^4;c[_]:=错误;h[_]:=0;f[n_]:=除数Sigma[0,n];
%t a[1]=j=u=1;r=0;
%t收割[Do[
%t如果[c[j],
%t k=j+f[u];h[j]++;h[u]-,
%t k=f[j];c[j]=正确;h[j]++];
%t u=最小值[u,j];集合[{a[n],j},{k,k}];而[h[u]==0,u++];
%t如果[k>r,r=k;母猪[r]],{n,2,nn}]][[-1,-1]]
%Y参考A000005、A360179、A362128。
%K nonn公司
%O 1,2号机组
%2023年4月9日,A _Michael De Vlieger
|