|
Search: id:A085460
|
|
|
| A085460 |
|
Primes p such that there is at least one k dividing (p-1)!-1 (p<=k<=2p). |
|
+0 1
|
|
| 2, 43, 47, 53, 97, 367, 499, 617, 653, 661, 719, 757, 787, 971, 1093, 1109, 1163, 1249, 1283, 1447, 1579, 1657, 1663, 1733, 1993, 2099, 2141, 2251, 2287, 2311, 2333, 2557, 2591, 2593, 2621, 2879, 2917, 2957, 2963, 2971, 3253, 3301, 3499, 3719, 3733, 3767
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
PROGRAM
|
(PARI) forprime(n=1, 1000, if(sum(k=n, 2*n, if(((n-1)!-1)%k, 0, 1))>0, print1(n, ", ")))
|
|
CROSSREFS
|
Sequence in context: A130506 A052078 A069544 this_sequence A139835 A137415 A090194
Adjacent sequences: A085457 A085458 A085459 this_sequence A085461 A085462 A085463
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Benoit Cloitre (benoit7848c(AT)orange.fr), Aug 14 2003
|
|
EXTENSIONS
|
More terms from Ray Chandler (rayjchandler(AT)sbcglobal.net), Aug 16 2003
|
|
|
Search completed in 0.002 seconds
|