A154731 Integers of the form k = m^3-m^2 such that k-+1 are primes.

4, 18, 180, 2028, 8820, 34848, 108288, 191748, 720900, 875520, 960498, 990000, 1355310, 1629108, 1713600, 1756920, 2334948, 2609028, 7376850, 8448048, 21639798, 37148148, 42023088, 48893940, 60544008, 63840000, 100328400

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jan 14 2009

Keywords

• nonn

Crossrefs

Cf. A111503

Programs

Mathematica

lst={};Do[k=n^3-n^2;If[PrimeQ[k-1]&&PrimeQ[k+1],AppendTo[lst,p]],{n,7!}];lst

Formula

A045991 INTERSECT A014574. - R. J. Mathar, Jul 16 2022