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 A154113 #13 Sep 08 2022 08:45:40
%S A154113 7,23,109,191,307,463,919,1231,1607,2053,4657,7639,8861,34913,41719,
%T A154113 53503,77743,89189,95311,122599,138007,146173,182057,223381,246203,
%U A154113 353011,383833,416399,433351,468623,505759,544807,721079,745471,875711
%N A154113 Primes of the form (n+1)^3 - n^2.
%H A154113 G. C. Greubel, <a href="/A154113/b154113.txt">Table of n, a(n) for n = 1..2000</a>
%e A154113 2^3-1^2=7, 3^3-2^2=23, ...
%t A154113 a[n_]:=(n+1)^3-n^2;lst={};Do[If[PrimeQ[a[n]],AppendTo[lst,a[n]]],{n,6!}];lst
%t A154113 Select[(#+1)^3-#^2&/@Range[200],PrimeQ] (* _Harvey P. Dale_, Mar 14 2011 *)
%o A154113 (Magma) [a: n in [0..100] | IsPrime(a) where a is (n+1)^3 - n^2]; // _Vincenzo Librandi_, Sep 02 2016
%o A154113 (PARI) for(n=1,1e3, if(isprime(t=(n+1)^3 - n^2), print1(t", "))) \\ _Charles R Greathouse IV_, Sep 02 2016
%Y A154113 Cf. A140719, A005097, A154111, A154112.
%K A154113 nonn,easy
%O A154113 1,1
%A A154113 _Vladimir Joseph Stephan Orlovsky_, Jan 04 2009