|
| |
|
|
A103818
|
|
Primes p such that p and p+2 are twin primes and also the strings 987654321p and 987654321p+2 are twin primes.
|
|
0
| |
|
|
569, 1019, 2267, 2801, 3917, 5879, 8231, 8999, 18917, 19139, 25301, 26111, 27281, 30089, 40127, 42071, 43319, 53279, 55337, 57527, 75539, 80747, 84317, 103991, 106961, 117701, 149519, 154157, 154871, 156491, 159347, 160709, 201827, 208589
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 569 and 571 are twin primes, also 987654321569 and 987654321571 are twin primes
|
|
|
MATHEMATICA
| fQ[n_] := Block[{p = IntegerDigits[n], q = IntegerDigits[n + 2], r = {9, 8, 7, 6, 5, 4, 3, 2, 1}}, If[ PrimeQ[n + 2] && PrimeQ[ FromDigits[ Join[r, p]]] && PrimeQ[ FromDigits[ Join[r, q]]], True, False]]; Select[ Prime[ Range[ 19400]], fQ[ # ] &] (from Robert G. Wilson v Mar 30 2005)
|
|
|
CROSSREFS
| Sequence in context: A184682 A192822 A142818 * A097035 A074907 A073036
Adjacent sequences: A103815 A103816 A103817 * A103819 A103820 A103821
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Mar 30 2005
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Mar 30 2005
|
| |
|
|
