|
|
A109305
|
|
Primes containing as substring the string reversal of their index.
|
|
1
|
|
|
17, 491, 1823, 6883, 183661, 757063, 9642461, 10398683, 11948737, 61241363, 125644177, 141037697, 168598249, 329147719, 1507060573, 2936125141, 24257906011, 74038127803, 863209344623, 1167992076341
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
94th prime, 491, contains 49 = the string reversal of its index;
281st prime, 1823, contains 182 = the string reversal of its index;
7144652nd prime, 125644177, contains 2564417 = the string reversal of its index; etc.
|
|
MATHEMATICA
|
fQ[n_] := StringPosition[ ToString[ Prime[n]], StringReverse[ ToString[n]]] != {}; Do[ If[ fQ[n], Print[ Prime[n]]], {n, 10^8}] (* Robert G. Wilson v, Jun 28 2005 *)
|
|
CROSSREFS
|
Corresponding indices form A109304.
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|