|
%I #17 Sep 05 2018 09:03:45
%S 1,5,17,20,21,30,53,60,86,137,172,195,212,224,229,258,268,272,319,339,
%T 355,365,366,389,390,398,414,467,480,504,534,539,543,567,592,619,626,
%U 654,709,735,756,766,770,778,787,806,812,874,943,973,1003,1036,1040
%N Numbers n such that n^10 + n^9 + n^8 + n^7 + n^6 + n^5 + n^4 + n^3 + n^2 + n + 1 is prime.
%C The associated primes are in A162861.
%C Numbers n such that Phi(11,n) is prime, where Phi(11,n) = (n^11 - 1)/(n - 1) is the eleventh cyclotomic polynomial. - _Jianing Song_, Sep 05 2018
%H Charles R Greathouse IV, <a href="/A162862/b162862.txt">Table of n, a(n) for n = 1..10000</a>
%H <a href="/index/Cy#CyclotomicPolynomialsValuesAtX">Index to values of cyclotomic polynomials of integer argument</a>
%F A000040 INTERSECT A060885.
%t Select[Range[100], PrimeQ[1 + Sum[#^i, {i, 10}]] &] (* _Alonso del Arte_, Apr 11 2014 *)
%o (PARI) is(n)=isprime(polcyclo(11,n)) \\ _Charles R Greathouse IV_, Sep 14 2015
%Y Cf. A060885, A162861.
%K nonn
%O 1,2
%A _Vladimir Joseph Stephan Orlovsky_, Jul 14 2009
|
