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

%I #4 Aug 21 2016 10:47:12

%S 5309,18269,24317,56503,73783,57149,133183,622331,607517,1002583,

%T 1815731,1161343,1273663,1351423,1145789,2008063,1478429,1910429,

%U 5142131,5326903,5766463,5930623,6393943,4538717,14532731,6912989

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

%C 23^3-19^3+1=5309,...

%H Harvey P. Dale, <a href="/A176136/b176136.txt">Table of n, a(n) for n = 1..1000</a>

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

%t Select[#[[2]]-#[[1]]+1&/@(Partition[Prime[Range[200]],2,1]^3),PrimeQ] (* _Harvey P. Dale_, Aug 21 2016 *)

%Y Cf. A000040, A176134, A176135

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Apr 09 2010