OFFSET
1,1
LINKS
Indranil Ghosh, Table of n, a(n) for n = 1..1023
EXAMPLE
52 is in the sequence because the reverse of 52^3 is 806041 and it is a prime. - Indranil Ghosh, Feb 10 2017
MATHEMATICA
Select[ Range[ 1000 ], PrimeQ[ ToExpression[ StringReverse[ ToString[ #^3 ] ] ] ] & ]
Select[Range[1000], PrimeQ[IntegerReverse[#^3]]&] (* Harvey P. Dale, Dec 20 2023 *)
PROG
(Magma) [n: n in [1..800] | IsPrime(Seqint(Reverse(Intseq(n^3))))]; // Marius A. Burtea, Jan 12 2019
(PARI) isok(n) = isprime(fromdigits(Vecrev(digits(n^3)))); \\ Michel Marcus, Jan 12 2019
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Robert G. Wilson v, Jan 16 2001
STATUS
approved