|
Search: id:A140556
|
|
|
| A140556 |
|
Primes p such that p + 10 is not a prime. |
|
+0
1
|
|
| 2, 5, 11, 17, 23, 29, 41, 47, 53, 59, 67, 71, 83, 89, 101, 107, 109, 113, 131, 137, 149, 151, 167, 173, 179, 191, 193, 197, 199, 211, 227, 233, 239, 251, 257, 263, 269, 277, 281, 293, 311, 313, 317, 331, 347, 353, 359, 367, 383, 389, 397, 401, 419, 431, 443
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
lst={}; Do[If[ !PrimeQ[n+10]&&PrimeQ[n], AppendTo[lst, n]], {n, 6!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Feb 21 2009]
|
|
CROSSREFS
|
Sequence in context: A138644 A164921 A156830 this_sequence A003627 A103203 A105875
Adjacent sequences: A140553 A140554 A140555 this_sequence A140557 A140558 A140559
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Juri-Stepan Gerasimov (2stepan(AT)rambler.ru), Jul 03 2008
|
|
EXTENSIONS
|
Corrected, added Mathematica program. Vladimir Orlovsky (4vladimir(AT)gmail.com), Feb 21 2009
|
|
|
Search completed in 0.002 seconds
|
