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

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

Author

Vladimir Joseph Stephan Orlovsky, Apr 09 2010

Keywords

• nonn

Comments

5^3+3^3-1=151,...

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000040, A176134, A176135, A176136

Programs

Mathematica

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 *)