A355319 Maximal GCD of four positive integers with sum n.

1, 1, 1, 1, 2, 1, 2, 1, 3, 1, 2, 3, 4, 1, 3, 1, 5, 3, 2, 1, 6, 5, 2, 3, 7, 1, 6, 1, 8, 3, 2, 7, 9, 1, 2, 3, 10, 1, 7, 1, 11, 9, 2, 1, 12, 7, 10, 3, 13, 1, 9, 11, 14, 3, 2, 1, 15, 1, 2, 9, 16, 13, 11, 1, 17, 3, 14, 1, 18, 1, 2, 15, 19, 11, 13, 1, 20, 9, 2, 1, 21, 17, 2, 3, 22, 1, 18, 13, 23, 3, 2, 19, 24, 1, 14, 11, 25

Offset: 4

Author

Wesley Ivan Hurt, Jun 29 2022

Keywords

• nonn

Crossrefs

Cf. A008233, A129649.

Maximal GCD of k positive integers with sum n for k = 2..10: A032742 (k=2,n>=2), A355249 (k=3), this sequence (k=4), A355366 (k=5), A355368 (k=6), A355402 (k=7), A354598 (k=8), A354599 (k=9), A354601 (k=10).

Programs

Mathematica

a[n_] := GCD @@@ IntegerPartitions[n, {4}] // Max;
Table[a[n], {n, 4, 100}] (* Jean-François Alcover, Sep 21 2022 *)