A328823 a(n) is the least prime factor of A000096(n) = n*(n+3)/2.

2, 5, 3, 2, 2, 3, 5, 2, 2, 5, 7, 2, 2, 7, 3, 2, 2, 3, 11, 2, 2, 5, 13, 2, 2, 13, 3, 2, 2, 3, 17, 2, 2, 17, 5, 2, 2, 19, 3, 2, 2, 3, 23, 2, 2, 7, 5, 2, 2, 5, 3, 2, 2, 3, 5, 2, 2, 29, 31, 2, 2, 5, 3, 2, 2, 3, 5, 2, 2, 5, 37, 2, 2, 7, 3, 2, 2

Offset

1,1

Comments

The motivation is that n*(n+3)/2 = n + T(n), where T(n) = n*(n+1)/2 = A000217(n), the triangular numbers.

Links

Table of n, a(n) for n=1..77.

Formula

a(n) = A020639(A000096(n)). - Michel Marcus, Oct 28 2019

Example

For n = 5, n + T(n) = 5 + 15 = 20. The smallest prime factor of 20 is 2, so a(5) = 2.

Mathematica

Array[FactorInteger[# (# + 3)/2][[1, 1]] &, 77] (* Amiram Eldar, Nov 02 2019 *)

Prog

(PARI) A328823(n)=A020639(n*(n+3)/2) \\ M. F. Hasler, Nov 10 2019

Crossrefs

Cf. A000096 (n + T(n)), A000217 (triangular numbers), A020639 (smallest prime factor).

Sequence in context: A159897 A019709 A076840 * A364143 A346265 A188923

Adjacent sequences: A328820 A328821 A328822 * A328824 A328825 A328826

Keyword

nonn

Author

Ali Sada, Oct 28 2019

Extensions

Simpler definition from M. F. Hasler, Nov 10 2019

Status

approved