A176136
Primes p of the form prime(n+1)^3-prime(n)^3+1.
Original entry on oeis.org
5309, 18269, 24317, 56503, 73783, 57149, 133183, 622331, 607517, 1002583, 1815731, 1161343, 1273663, 1351423, 1145789, 2008063, 1478429, 1910429, 5142131, 5326903, 5766463, 5930623, 6393943, 4538717, 14532731, 6912989
Offset: 1
-
Select[Table[Prime[n+1]^3-Prime[n]^3+1,{n,6!}],PrimeQ[ # ]&]
Select[#[[2]]-#[[1]]+1&/@(Partition[Prime[Range[200]],2,1]^3),PrimeQ] (* Harvey P. Dale, Aug 21 2016 *)
A176135
Primes p of the form prime(n+1)^3-prime(n)^3-1.
Original entry on oeis.org
97, 45053, 56501, 21601, 104021, 426941, 345601, 437401, 1351421, 4409677, 3936727, 5880727, 4608701, 5326901, 6393941, 2160001, 6566741, 2613601, 8323253, 9750581, 13392343, 10233341, 30060757, 48278539, 23380183, 22018301
Offset: 1
-
Select[Table[Prime[n+1]^3-Prime[n]^3-1,{n,6!}],PrimeQ[ # ]&]
Select[#[[2]]-#[[1]]-1&/@Partition[Prime[Range[200]]^3,2,1],PrimeQ] (* Harvey P. Dale, Nov 13 2017 *)
A176138
Primes p of the form prime(n+1)^3+prime(n)^3-1.
Original entry on oeis.org
151, 467, 3527, 7109, 183329, 432359, 2123027, 2317769, 4296473, 8988209, 14156927, 20483497, 27649439, 43441973, 62519309, 95699141, 127051973, 148178519, 161245727, 201100409, 242622269, 301396087, 322007743, 432003599
Offset: 1
-
Select[Table[Prime[n+1]^3+Prime[n]^3-1,{n,7!}],PrimeQ[ # ]&]
Select[Total[#]-1&/@Partition[Prime[Range[150]]^3,2,1],PrimeQ] (* Harvey P. Dale, Nov 06 2019 *)
A176139
Primes of the form prime(n+1)^3+prime(n)^3+1.
Original entry on oeis.org
3529, 54181, 148429, 354257, 2520073, 11665081, 14156929, 15525973, 22786651, 26301257, 35166041, 39367621, 44853229, 62519311, 110621827, 132899131, 141977989, 148178521, 161245729, 177457157, 259135757, 615109951, 648551359
Offset: 1
-
Select[Table[Prime[n+1]^3+Prime[n]^3+1,{n,6!}],PrimeQ[ # ]&]
Select[Total/@Partition[Prime[Range[150]]^3,2,1]+1,PrimeQ] (* Harvey P. Dale, Aug 04 2016 *)
-
p=2;forprime(q=3,1e4,if(isprime(t=p^3+q^3+1),print1(t", "));p=q) \\ Charles R Greathouse IV, Apr 15 2012
Showing 1-4 of 4 results.
Comments