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,3

Comments

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

Links

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

Mathematica

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

Crossrefs

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

Sequence in context: A129650 A355367 A355403 * A379153 A339546 A007894

Adjacent sequences: A319052 A319053 A319054 * A319056 A319057 A319058

Keyword

nonn

Author

Gus Wiseman, Sep 09 2018

Status

approved