%I#13 2023年12月21日21:22:40
%S 1,13,2,12,3,11,4,10,5,9,6,8,7,14,16,17,18,15,20,19,23,22,24,21,25,26,
%电话:29,27,28,32,30,33,36,34,31,35,39,37,38,40,44,41,42,45,46,47,48,50,
%U 49,53,51,54,52,58,56,55,57,60,59,61,62,64,65,67,63,66,68,70,71,69,72,73,74,76,77,75,78,80,79,82
%N词汇学上最早的不同正整数序列,使得a(N)+a(N+1)的不同素因子之和是一个复合数。
%n的不同素因子之和有时称为sopf(n)。
%Héric Angelini,<a href=“https://cinquantesignes.blogspot.com/2023/12/palindromes-with-distinct-prime-factors.html“>不同主要因素之和,个人博客,2023年12月。
%e a(1)+a(2)=1+13=14,其sopf为2+7=9,为复合;
%e a(2)+a(3)=13+2=15,其sopf为3+5=8,为复合;
%e a(3)+a(4)=2+12=14,其sopf为2+7=9,为复合;
%e a(4)+a(5)=12+3=15,其sopf为3+5=8,为复合;
%e a(13)+a(14)=7+14=21,其sopf为3+7=10,为复合;等等。
%ta[1]=1;a[n_]:=a[n]=(k=1;而[MemberQ[数组[a,n-1],k]||PrimeQ@总计[First/@FactorInteger[k+a[n-1]],k++];k) ;数组[a,81]
%Y参考A008472、A367935。
%K nonn公司
%O 1,2号机组
%A _Eric Angelini和Giorgos Kalogeropoulos,2023年12月5日
|