|
|
A363944
|
|
Mean of the multiset of prime indices of n, rounded up.
|
|
21
|
|
|
0, 1, 2, 1, 3, 2, 4, 1, 2, 2, 5, 2, 6, 3, 3, 1, 7, 2, 8, 2, 3, 3, 9, 2, 3, 4, 2, 2, 10, 2, 11, 1, 4, 4, 4, 2, 12, 5, 4, 2, 13, 3, 14, 3, 3, 5, 15, 2, 4, 3, 5, 3, 16, 2, 4, 2, 5, 6, 17, 2, 18, 6, 3, 1, 5, 3, 19, 3, 6, 3, 20, 2, 21, 7, 3, 4, 5, 3, 22, 2, 2, 7
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
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.
Extending the terminology introduced at A124944, this is the "high mean" of prime indices.
|
|
LINKS
|
|
|
EXAMPLE
|
The prime indices of 360 are {1,1,1,2,2,3}, with mean 3/2, so a(360) = 2.
|
|
MATHEMATICA
|
prix[n_]:=If[n==1, {}, Flatten[Cases[FactorInteger[n], {p_, k_}:>Table[PrimePi[p], {k}]]]];
meanup[y_]:=If[Length[y]==0, 0, Ceiling[Mean[y]]];
Table[meanup[prix[n]], {n, 100}]
|
|
CROSSREFS
|
Positions of first appearances are 1 and A000040.
The triangle for this statistic (high mean) is A363946.
A360005 gives twice the median of prime indices.
A363950 ranks partitions with low mean 2, counted by A026905 redoubled.
Cf. A051293, A124943, A215366, A327473, A327476, A327482, A359889, A362611, A363723, A363724, A363727, A363951.
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|