|
Search: id:A072275
|
|
|
| A072275 |
|
Least m such that one less than m-th prime has n divisors (or 0 if no such prime exists). |
|
+0 1
|
|
| 2, 3, 4, 7, 6, 0, 11, 12, 30, 0, 18, 0, 44, 79, 47, 0, 42, 0, 53, 106, 1581, 0, 82, 211, 1470, 595, 319, 0, 169, 0, 216, 2819, 177975, 279, 0, 62947, 41203, 326, 0, 647, 0, 1795, 907
(list; graph; listen)
|
|
|
OFFSET
|
2,1
|
|
|
MATHEMATICA
|
Do[ If[ !PrimeQ[n], k = 1; While[ Length[ Divisors[ Prime[k] - 1]] != n, k++ ]; Print[k], Print[0]], {n, 6, 34}]
|
|
CROSSREFS
|
A000040{a(n)}=A066814(n).
Sequence in context: A026237 A125150 A167151 this_sequence A122989 A077223 A055265
Adjacent sequences: A072272 A072273 A072274 this_sequence A072276 A072277 A072278
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Lekraj Beedassy (blekraj(AT)yahoo.com), Jul 09 2002
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 15 2002
|
|
|
Search completed in 0.002 seconds
|