OFFSET
1,3
COMMENTS
A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.
LINKS
EXAMPLE
The prime indices of 540 are {1,1,2,2,2,3}, with strictly increasing runs ({1},{1,2},{2},{2,3}), with minima (1,1,2,2), summing to a(540) = 6.
MATHEMATICA
prix[n_]:=If[n==1, {}, Flatten[Cases[FactorInteger[n], {p_, k_}:>Table[PrimePi[p], {k}]]]];
Table[Total[First/@Split[prix[n], Less]], {n, 100}]
CROSSREFS
For leaders of constant runs we have A066328.
Row-sums of A375128.
For length instead of sum we have A375136.
A055887 counts sequences of partitions with total sum n.
A112798 lists prime indices:
- leader A055396
- sum A056239
- reverse A296150
KEYWORD
nonn
AUTHOR
Gus Wiseman, Aug 04 2024
STATUS
approved