|
| |
|
|
A067185
|
|
Numbers n such that prime(n+1)+prime(n)==1 (mod n).
|
|
2
| |
|
|
7, 17, 109, 281, 1669, 6592663, 16899113, 16899145, 16899295, 749973611, 5067034877, 5067034925, 34487825911, 1626582230375
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| a = b = 0; Do[b = Prime[n + 1]; If[Mod[a + b, n] == 1, Print[n]]; a = b, {n, 1, 10^9}]
|
|
|
CROSSREFS
| Sequence in context: A092340 A181605 A068172 * A063384 A165246 A118108
Adjacent sequences: A067182 A067183 A067184 * A067186 A067187 A067188
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), Feb 19 2002
|
|
|
EXTENSIONS
| Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 19 2002
Extended by David W. Wilson (davidwwilson(AT)comcast.net), Feb 20 2002
a(11)-a(14) from Donovan Johnson (donovan.johnson(AT)yahoo.com), Mar 10 2010
|
| |
|
|
