|
| |
|
|
A105329
|
|
Numbers n such that prime(n + 1) == 5 (mod n).
|
|
4
|
|
|
|
1, 2, 6, 7, 12, 14, 181, 1053, 1057, 2614, 40089, 40114, 40117, 40119, 100346, 100352, 100358, 251707, 251742, 251743, 251754, 251757, 1617173, 4124458, 10553513, 27067262, 27067272, 179992838, 179993008
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
COMMENTS
|
There are no further terms up to 215000000. - Farideh Firoozbakht, May 13 2005
|
|
|
LINKS
|
Table of n, a(n) for n=1..29.
|
|
|
MATHEMATICA
|
Do[If[5 == Mod[Prime[n + 1], n], bb = Append[bb, n]], {n, 1, 251758}];
bb={}; Do[If[5 == Mod[Prime[n + 1], n], bb = Append[bb, n]], {n, 1, 251758}]; bb (Firoozbakht)
|
|
|
PROG
|
(Sage)
def A105329(max) :
....terms = []
....p = 3
....for n in xrange(1, max+1) :
........if (p - 5) % n == 0 : terms.append(n)
........p = next_prime(p)
....return terms
end # Eric M. Schmidt, Feb 05 2013
|
|
|
CROSSREFS
|
Cf. A105286, A105287, A105288, A105290.
Sequence in context: A172154 A072147 A190121 * A124319 A078471 A127406
Adjacent sequences: A105326 A105327 A105328 * A105330 A105331 A105332
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Zak Seidov, Apr 30 2005
|
|
|
EXTENSIONS
|
More terms from Farideh Firoozbakht, May 13 2005
First two terms from Eric M. Schmidt, Feb 05 2013
|
|
|
STATUS
|
approved
|
| |
|
|
