OFFSET
1,1
COMMENTS
Numbers not divisible by 10 whose digital reversal is prime. - David A. Corneth, Feb 26 2026
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..3500
MATHEMATICA
Take[Sort[FromDigits[Reverse[IntegerDigits[#]]]&/@Prime[Range[500]]], 60] (* Harvey P. Dale, Nov 08 2011 *)
Take[Sort[IntegerReverse[Prime[Range[500]]]], 60] (* Harvey P. Dale, Mar 26 2025 *)
PROG
(PARI) isok(k) = (k%10) && isprime(fromdigits(Vecrev(digits(k)))); \\ Michel Marcus, Feb 26 2026
(Magma) Sort([StringToInteger(Reverse(IntegerToString(NthPrime(i)))) : i in [1..500]])[1..60]; // Vincenzo Librandi, Feb 26 2026
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Jason Earls, Sep 14 2002
EXTENSIONS
Offset changed by Andrew Howroyd, Sep 18 2024
STATUS
approved
