OFFSET
1,1
EXAMPLE
a(5) = 62343227157465615355481 = a(4)^3 - 32 = 39651817^3 - 32 and there is no k < 32 such that 39651817^3 - k is prime.
MATHEMATICA
a=2; Join[{2}, Table[a=a^3; While[ !PrimeQ[a], a=a-1]; a, {5}]] (* T. D. Noe, Nov 15 2006 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, May 05 2006
EXTENSIONS
Corrected by T. D. Noe, Nov 15 2006
STATUS
approved