|
Search: id:A138920
|
|
|
| A138920 |
|
Indices k such that A020509(k)=Phi[k](-10) is prime, where Phi is a cyclotomic polynomial. |
|
+0
19
|
|
| 4, 5, 7, 12, 19, 24, 31, 36, 38, 46, 48, 53, 67, 75, 78, 120, 186, 196, 293, 320, 327, 369, 634, 641, 713, 770, 931
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
"Unique [period] primes" (A040017) are often of the form Phi[k](10) or Phi[k](-10).
|
|
LINKS
|
C. Caldwell, Unique Primes.
Index entries for cyclotomic polynomials, values at X
|
|
PROGRAM
|
(PARI) for( i=1, 999, is/*pseudo*/prime( polcyclo(i, -10)) && print1( i", ")) /* for PARI < 2.4.2 use ...subst(polcyclo(i, x), x, -10)... */
|
|
CROSSREFS
|
Cf. A019328, A040017, A138940.
Sequence in context: A160934 A032390 A112918 this_sequence A048224 A064237 A139373
Adjacent sequences: A138917 A138918 A138919 this_sequence A138921 A138922 A138923
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
M. F. Hasler (www.univ-ag.fr/~mhasler), Apr 03 2008
|
|
|
Search completed in 0.002 seconds
|
