OFFSET
1,2
COMMENTS
Corresponding cubes are: {1,1,5,9,15,17,23,26,36,41,53,71,76}^3. Cf. A064370: numbers n such that the n-th prime - n is a square.
MATHEMATICA
Transpose[Select[Table[{Prime[n], n}, {n, 76*10^5}], IntegerQ[Surd[#[[1]]- #[[2]], 3]]&]][[2]] (* Harvey P. Dale, Jun 22 2016 *)
PROG
(PARI) isok(n) = ispower(prime(n)-n, 3); \\ Michel Marcus, Oct 05 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, May 03 2005
EXTENSIONS
a(14)-a(32) from Donovan Johnson, Dec 02 2009
STATUS
approved