A332547 a(n) = largest odd divisor d < n of n*(n+1)/2.

1, 1, 1, 1, 3, 3, 1, 3, 5, 5, 3, 3, 7, 7, 5, 1, 9, 9, 5, 15, 11, 11, 3, 15, 13, 13, 21, 7, 15, 15, 1, 11, 17, 17, 21, 9, 19, 19, 15, 5, 21, 21, 11, 33, 23, 23, 3, 21, 35, 25, 39, 13, 27, 45, 35, 21, 29, 29, 15, 15, 31, 31, 21, 13, 55, 33, 17, 51, 35, 35

Offset: 1

Author

N. J. A. Sloane, Feb 21 2020

Keywords

• nonn

Comments

Used by Michael J. Collins in the analysis of A082183 and A082184.

Links

• Hugo Pfoertner, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000217, A068194 (where a(n)=1), A082183, A082184, A332548, A332549 (where a(n)=3).

Programs

Mathematica

Join[{1},Table[Select[Divisors[(n(n+1))/2],OddQ[#]&&#Harvey P. Dale, Jul 16 2024 *)