login
Primes p of the form prime(n+1)^3-prime(n)^3-1.
3

%I #4 Nov 13 2017 10:05:48

%S 97,45053,56501,21601,104021,426941,345601,437401,1351421,4409677,

%T 3936727,5880727,4608701,5326901,6393941,2160001,6566741,2613601,

%U 8323253,9750581,13392343,10233341,30060757,48278539,23380183,22018301

%N Primes p of the form prime(n+1)^3-prime(n)^3-1.

%C 5^3-3^3-1=97,...

%t Select[Table[Prime[n+1]^3-Prime[n]^3-1,{n,6!}],PrimeQ[ # ]&]

%t Select[#[[2]]-#[[1]]-1&/@Partition[Prime[Range[200]]^3,2,1],PrimeQ] (* _Harvey P. Dale_, Nov 13 2017 *)

%Y Cf. A000040, A176134

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Apr 09 2010