%我#19 2023年12月29日10:59:16
%S 1,2,3,6,4,8,12,18,10,16,20,25,19,27,9,36,24,30,15,35,22,33,5,38,14,
%电话:43,11,26,13,7,28,34,31,21,17,23,29,39,44,42,40,32,45,51,37,48,50,
%U 52、46、56、60、41、55、54、58、53、57、49、62、59、61、63、64、65、69、66、70、68、73、71、77、67
%N a(1)=1。a(2)=2。对于n>=3,a(n)是序列中较早出现的最小正整数,即(Sum_{k=1..n}a(k))除以Product_{j=1..n{a(j)。
%这是正整数的置换吗?
%H Ivan Neretin,n的表,n=1..1000的a(n)</a>
%eα(1)+a(2)+aα(3)+aβ(4)+aγ(5)+aδ(6)=1+2+3+6+4+8=24。a(1)*a(2)*a。24除以1152。如果a(6)是小于8的正整数中的任何一个,并且在序列中没有更早出现(即,如果它是5或7),那么序列的前6项之和将不会除以前6项的乘积。
%t f[l_List]:=块[{k=1,s=Plus@@l,p=Times@@l},而[MemberQ[l,k]||Mod[k*p,k+s]>0,k++];追加[l,k]];巢穴[f,{1,2},75](*雷·钱德勒,2007年1月22日*)
%Y参见A127563、A127564。
%K nonn公司
%O 1,2号机组
%2007年1月18日
%E由雷·钱德勒扩展,2007年1月22日
|