|
%I #9 Jul 16 2022 17:15:10
%S 12,150,810,1452,1872,18252,87120,106032,242172,333270,362952,712890,
%T 1968750,2763600,3198132,5767380,10551420,16451580,18469440,23230350,
%U 25498620,30468672,31955502,34752252,39768102,40825920,56770560
%N Integers of the form k = m^3+m^2 such that k-+1 are primes.
%F A011379 INTERSECT A014574. - _R. J. Mathar_, Jul 16 2022
%F a(n) = A011379(A154732(n)). - _R. J. Mathar_, Jul 16 2022
%e 2^3+2^2 = 12, and 12-+1 are primes, so 12 is a term.
%t lst={};Do[k=n^3+n^2;If[PrimeQ[k-1]&&PrimeQ[k+1],AppendTo[lst,k]],{n,8!}];lst
%Y Cf. A111503, A154731, A154732
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Jan 14 2009
|
