A375403 Numbers whose maximal anti-runs of weakly increasing prime factors (with multiplicity) do not have distinct maxima.
4, 8, 9, 16, 18, 24, 25, 27, 32, 36, 40, 48, 49, 50, 54, 56, 64, 72, 75, 80, 81, 88, 96, 98, 100, 104, 108, 112, 120, 121, 125, 128, 135, 136, 144, 147, 150, 152, 160, 162, 168, 169, 176, 184, 189, 192, 196, 200, 208, 216, 224, 225, 232, 240, 242, 243, 245
Offset: 1
Keywords
Examples
The maximal anti-runs of prime factors of 150 are ((2,3,5),(5)), with maxima (5,5), so 150 is in the sequence. The maximal anti-runs of prime factors of 180 are ((2),(2,3),(3,5)), with maxima (2,3,5), so 180 is not in the sequence. The maximal anti-runs of prime factors of 300 are ((2),(2,3,5),(5)), with maxima (2,5,5), so 300 is in the sequence. The terms together with their prime indices begin: 4: {1,1} 8: {1,1,1} 9: {2,2} 16: {1,1,1,1} 18: {1,2,2} 24: {1,1,1,2} 25: {3,3} 27: {2,2,2} 32: {1,1,1,1,1} 36: {1,1,2,2} 40: {1,1,1,3} 48: {1,1,1,1,2}
Crossrefs
Partitions of this type are counted by A375401.
Programs
-
Mathematica
Select[Range[150],!UnsameQ@@Max /@ Split[Flatten[ConstantArray@@@FactorInteger[#]],UnsameQ]&]
Comments