A356729 Numbers having at least 4 distinct partitions into exactly 3 parts with the same product.
118, 130, 133, 135, 137, 140, 148, 149, 153, 155, 161, 167, 169, 174, 175, 182, 183, 185, 189, 190, 194, 195, 200, 202, 205, 206, 208, 209, 210, 213, 214, 215, 216, 217, 220, 221, 222, 223, 224, 225, 228, 229, 231, 234, 235, 236, 239, 240, 243, 244, 245, 247, 248, 249, 250, 251, 253, 254
Offset: 1
Keywords
Examples
118 is in this sequence because it has 4 partitions (14,50,54), (15,40,63), (18,30,70), and (21,25,72) with the same product 37800.
Crossrefs
Cf. A119028.
Programs
-
Mathematica
Select[Range[3, 300], Max[Transpose[Tally[Apply[Times, IntegerPartitions[#, {3}], {1}]]][[2]]] >= 4 &]
Comments