login
A162904
Primes 2 less than a tetrahedral number.
1
2, 163, 967, 4493, 9137, 32507, 39709, 47903, 67523, 176849, 221813, 708559, 1543463, 1726667, 2481113, 2997409, 3428423, 3737579, 4410547, 4775383, 5774273, 6209893, 6903563, 9001627, 9585343, 10507397, 11153833, 15596033
OFFSET
1,1
COMMENTS
Primes of the form A000292(k)-2.
LINKS
EXAMPLE
2 = 4-2 = A000292(2)-2. 163 = 165-2 = A000292(9)-2. 967 = 969-2 = A000292(17)-2.
MAPLE
select(isprime, [seq(n*(n+1)*(n+2)/6-2, n=1..10^3)]); # Robert Israel, Jun 27 2019
MATHEMATICA
s1=s2=0; lst={}; Do[s2+=s1+=n; If[PrimeQ[s2-2], AppendTo[lst, s2-2]], {n, 2*6!}]; lst
Select[Table[(n(n+1)(n+2))/6-2, {n, 500}], PrimeQ] (* Harvey P. Dale, Jul 29 2023 *)
CROSSREFS
Cf. A000292.
Sequence in context: A202107 A300363 A109420 * A346720 A259319 A230912
KEYWORD
nonn
AUTHOR
EXTENSIONS
Definition rephrased by R. J. Mathar, Jul 27 2009
STATUS
approved