A380410 Numbers with greater product of prime indices than sum of prime factors.
1, 45, 49, 63, 75, 77, 81, 91, 99, 105, 117, 119, 121, 125, 126, 133, 135, 143, 147, 150, 153, 161, 162, 165, 169, 171, 175, 182, 187, 189, 195, 198, 203, 207, 209, 210, 217, 221, 225, 231, 234, 238, 242, 243, 245, 247, 250, 253, 255, 259, 261, 266, 270, 273
Offset: 1
Keywords
Examples
126 has prime indices {1,2,2,4} and prime factors {2,3,3,7}, and 16 > 15, so 126 is in the sequence. The terms together with their prime indices begin: 1: {} 45: {2,2,3} 49: {4,4} 63: {2,2,4} 75: {2,3,3} 77: {4,5} 81: {2,2,2,2} 91: {4,6} 99: {2,2,5} 105: {2,3,4} 117: {2,2,6} 119: {4,7} 121: {5,5} 125: {3,3,3} 126: {1,2,2,4} 133: {4,8} 135: {2,2,2,3}
Crossrefs
For factors instead of indices we have A002808.
The case of prime powers is A244623.
Positions of positive terms in A380344.
Partitions of this type are counted by A380411.
A001222 counts prime factors with multiplicity.
Triangles:
- A027746 = prime factors
- A112798 = prime indices
Statistics:
Combinations:
Programs
-
Mathematica
prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]]; Select[Range[100],Times@@prix[#]>Plus@@Prime/@prix[#]&]
Comments