%I #28 Oct 02 2021 15:21:46
%S 9,15,19,27,31,37,67,91,99,109,121,129,135,145,151,165,187,189,201,
%T 207,211,217,241,259,265,267,277,279,289,319,355,357,367,369,387,391,
%U 411,417,427,435,439,445,457,459,477,489,511,525,549,555,561,615,619,621
%N Numbers k such that k^3 - 2 is prime.
%H Nathaniel Johnston, <a href="/A038599/b038599.txt">Table of n, a(n) for n = 1..10000</a>
%F a(n) = (A038600(n)+2)^(1/3). - _Zak Seidov_, May 10 2016
%e 15^3 - 2 = 3373 is prime, so 15 is in the sequence.
%t a[n_]:=n^x-y;lst={};x=3;y=2;Do[If[PrimeQ[a[n]],AppendTo[lst,n]],{n,0,6!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Jan 03 2009 *)
%t Select[Range@ 640, PrimeQ[#^3 - 2] &] (* _Michael De Vlieger_, May 10 2016 *)
%o (PARI) is(n)=isprime(n^3-2) \\ _Charles R Greathouse IV_, Feb 17 2017
%Y Cf. A038600, A028870, A028873.
%K nonn
%O 1,1
%A _Jeff Burch_
%E Missed term, 207, and more terms added by _Zak Seidov_, Mar 14 2009