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,1

Links

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

Example

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

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

Crossrefs

Cf. A153257.

Sequence in context: A175605 A162576 A142166 * A128448 A121155 A201117

Adjacent sequences: A140716 A140717 A140718 * A140720 A140721 A140722

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Jul 11 2008

Extensions

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

Status

approved