OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[400]^3, PrimeQ[FromDigits[Join[{9}, IntegerDigits[#]]]]&] (* Harvey P. Dale, Nov 19 2014 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Claudio Meller, Nov 10 2009
STATUS
approved