|
|
A072366
|
|
Numbers x such that x + reverse of x is a prime.
|
|
6
|
|
|
1, 10, 100, 116, 118, 140, 142, 146, 158, 166, 170, 172, 178, 182, 188, 190, 196, 215, 217, 229, 239, 241, 245, 257, 265, 269, 271, 277, 281, 287, 295, 299, 314, 316, 328, 338, 340, 344, 356, 364, 368, 370, 376, 380, 386, 394, 398, 413, 415, 427, 437, 439
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
116 is a term because 116+611=727 is a prime.
|
|
MATHEMATICA
|
Select[Range[1000], PrimeQ[ # + FromDigits[Reverse[IntegerDigits[ # ]]]] &] (* Tanya Khovanova, Jul 23 2007 *)
|
|
PROG
|
(PARI) isok(n) = isprime(n+subst(Polrev(digits(n)), x, 10)); \\ Michel Marcus, Nov 29 2014
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|