OFFSET
1,2
COMMENTS
If n is a multiple of 10, after reversal leading zeros are discarded before adding 1.
LINKS
K. D. Bajpai, Table of n, a(n) for n = 1..10000
EXAMPLE
a(3)= 4: 4^3= 64: reversing the digits gives 46: 46+1= 47 which is prime.
a(4)= 6: 6^3= 216: reversing the digits gives 612: 612+1= 613 which is prime.
a(12)= 63: 63^3= 250047: reversing the digits gives 740052: 740052+1= 740053 which is prime.
MAPLE
with(StringTools): KD:= proc() local a; a:= parse(Reverse(convert((n^3), string)))+1; if isprime(a) then RETURN (n): fi; end: seq(KD(), n=1..5000);
MATHEMATICA
Select[Range[500], PrimeQ[ToExpression[StringReverse[ToString[#^3]]] + 1] &]
CROSSREFS
KEYWORD
nonn,base,less
AUTHOR
K. D. Bajpai, Nov 22 2013
STATUS
approved