login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Primes 2 less than a tetrahedral number.
1

%I #10 Jul 29 2023 17:29:46

%S 2,163,967,4493,9137,32507,39709,47903,67523,176849,221813,708559,

%T 1543463,1726667,2481113,2997409,3428423,3737579,4410547,4775383,

%U 5774273,6209893,6903563,9001627,9585343,10507397,11153833,15596033

%N Primes 2 less than a tetrahedral number.

%C Primes of the form A000292(k)-2.

%H Robert Israel, <a href="/A162904/b162904.txt">Table of n, a(n) for n = 1..10000</a>

%e 2 = 4-2 = A000292(2)-2. 163 = 165-2 = A000292(9)-2. 967 = 969-2 = A000292(17)-2.

%p select(isprime, [seq(n*(n+1)*(n+2)/6-2,n=1..10^3)]); # _Robert Israel_, Jun 27 2019

%t s1=s2=0;lst={};Do[s2+=s1+=n;If[PrimeQ[s2-2],AppendTo[lst,s2-2]],{n,2*6!}]; lst

%t Select[Table[(n(n+1)(n+2))/6-2,{n,500}],PrimeQ] (* _Harvey P. Dale_, Jul 29 2023 *)

%Y Cf. A000292.

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Jul 16 2009

%E Definition rephrased by _R. J. Mathar_, Jul 27 2009