A140719 Primes in A153257.

11, 89, 167, 431, 1187, 1559, 3119, 5471, 7559, 18899, 34781, 41579, 57719, 67157, 89009, 108191, 122399, 154439, 270269, 283007, 309671, 628487, 650759, 770039, 875327, 960299, 1213379, 1547207, 1800719, 1845491, 1984247, 2608751, 2724119

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jul 11 2008

Keywords

• nonn

Examples

			3^3-4^2=27-16=11, 5^3-6^2=125-36=89, 6^3-7^2=216-49=167,...
		

Links

• Robert Israel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A153257.

Programs

Maple

R:= NULL: count:= 0:
for n from 2 while count < 100 do
  p:= n^3 - (n+1)^2;
  if isprime(p) then
    count:=count+1; R:= R,p;
  fi
od:
R; # Robert Israel, Oct 19 2021

Mathematica

Select[ #^3 - (# + 1)^2 & /@ Range[2, 140], PrimeQ@ # &] (* Robert G. Wilson v, Aug 17 2008 *)

Extensions

More terms from Robert G. Wilson v, Aug 17 2008