This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A140719 #14 Mar 05 2024 07:10:47 %S A140719 11,89,167,431,1187,1559,3119,5471,7559,18899,34781,41579,57719,67157, %T A140719 89009,108191,122399,154439,270269,283007,309671,628487,650759,770039, %U A140719 875327,960299,1213379,1547207,1800719,1845491,1984247,2608751,2724119 %N A140719 Primes in A153257. %H A140719 Robert Israel, <a href="/A140719/b140719.txt">Table of n, a(n) for n = 1..10000</a> %e A140719 3^3-4^2=27-16=11, 5^3-6^2=125-36=89, 6^3-7^2=216-49=167,... %p A140719 R:= NULL: count:= 0: %p A140719 for n from 2 while count < 100 do %p A140719 p:= n^3 - (n+1)^2; %p A140719 if isprime(p) then %p A140719 count:=count+1; R:= R,p; %p A140719 fi %p A140719 od: %p A140719 R; # _Robert Israel_, Oct 19 2021 %t A140719 Select[ #^3 - (# + 1)^2 & /@ Range[2, 140], PrimeQ@ # &] (* _Robert G. Wilson v_, Aug 17 2008 *) %Y A140719 Cf. A153257. %K A140719 nonn %O A140719 1,1 %A A140719 _Vladimir Joseph Stephan Orlovsky_, Jul 11 2008 %E A140719 More terms from _Robert G. Wilson v_, Aug 17 2008