OFFSET
1,6
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
Antti Karttunen, Table of n, a(n) for n = 1..65537
EXAMPLE
88 has 4 prime indices {1,1,1,5}, the maximum of which is 5, so a(88) = min(4,5) = 4.
MATHEMATICA
Table[Min[PrimeOmega[n], PrimePi[FactorInteger[n][[-1, 1]]]], {n, 100}]
PROG
(PARI)
A061395(n) = if(1==n, 0, primepi(vecmax(factor(n)[, 1])));
CROSSREFS
KEYWORD
nonn,hear
AUTHOR
Gus Wiseman, Apr 12 2019
EXTENSIONS
More terms from Antti Karttunen, Apr 14 2019
STATUS
approved