A319055 Maximum product of an integer partition of n with relatively prime parts.

1, 1, 2, 3, 6, 6, 12, 18, 24, 36, 54, 72, 108, 162, 216, 324, 486, 648, 972, 1458, 1944, 2916, 4374, 5832, 8748, 13122, 17496, 26244, 39366, 52488, 78732, 118098, 157464, 236196, 354294, 472392, 708588, 1062882, 1417176, 2125764, 3188646, 4251528, 6377292

Offset: 1

Author

Gus Wiseman, Sep 09 2018

Keywords

• nonn

Comments

After a(7), this appears to be the same as A319054.

Crossrefs

Cf. A000740, A000792, A000793, A000837, A001414, A007916, A100953, A281116, A289508, A289509, A296302, A319054, A319057.

Programs

Mathematica

Table[Max[Times@@@Select[IntegerPartitions[n],GCD@@#==1&]],{n,20}]