%I#24 2022年9月8日08:46:10
%S 2,3,5,6,7,10,11,13,14,15,17,19,20,21,23,24,26,29,30,31,33,34,35,37,
%电话:38、40、41、43、44、46、47、51、52、53、55、57、58、59、60、61、63、65、67、71、73、74、76,
%U 78,79,83,84,85,86,88,89,90,92,93,96,97101103105107109单位
%N数N,使得sigma(N)-1是质数p。
%C素数的联合(A000040)和A066073的术语(复合)。
%C编号n,使A039653(n)为素数。
%C素数p的对应值在A248793中。
%H Michael De Vlieger,n的表,n的a(n)=1..10000</a>
%H OEIS Wiki,<a href=“https://oeis.org/wiki/Cyclotomic网站x=n,n!处的多项式!和sigma(n)“>x=n,n!和sigma-(n)的分圆多项式</a>
%e6是有序的,因为sigma(6)-1=12-1=11(素数)。
%p with(numtheory):A248792:=n->`if`(isprime(sigma(n)-1),n,NULL):seq(A248792(n),n=1..200);#_Wesley Ivan Hurt_,2015年7月9日
%t选择[Range[110],PrimeQ[DivisorSigma[1,#]-1]&](*_Winenzo Librandi_,2014年11月2日*)
%o(岩浆)[1..1000]|IsPrime(SumOfDivisors(n)-1)中的n:n
%o(PARI)(n=1,10^3,if(isprime(sigma(n)-1),print1(n,“,”))\\德雷克·奥尔,2014年11月1日
%Y参考A000203(除数之和),A000040(素数)。
%Y参考A039653(sigma(n)-1),A066073(复合材料的子序列),A248793。
%Y参考A065512(数字n,使sigma(n)+1为素数)。
%K nonn,简单
%O 1,1
%2014年11月1日,A_Jaroslav Krizek
|