login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A135592
a(n) is number of earlier terms equal to number of prime divisors of n.
1
1, 1, 2, 2, 2, 3, 2, 2, 2, 6, 2, 7, 2, 8, 8, 2, 2, 10, 2, 11, 11, 11, 2, 12, 2, 13, 2, 14, 2, 1, 3, 3, 15, 15, 15, 15, 3, 15, 15, 15, 3, 5, 3, 15, 15, 15, 3, 15, 3, 15, 15, 15, 3, 15, 15, 15, 15, 15, 3, 10, 3, 15, 15, 3, 15, 12, 3, 15, 15, 13, 3, 15, 3, 15, 15, 15, 15, 15, 3, 15, 3, 15, 3, 18
OFFSET
1,3
COMMENTS
Similar to A125087, but instead of exponents, we use number of prime divisors.
LINKS
EXAMPLE
a(12)=7 because 12 has 2 prime divisors (2 and 3) and there are 7 2's in a(1), a(2), ..., a(11).
PROG
(Maxima) max:1000; f:makelist(0, i, 1, max); apr:makelist(0, i, 1, max); f[1]:1; apr[2]:1; print(1, 1); for n:2 through max do block(f[n]:apr[length(ifactors(n))+1], apr[f[n]+1]:apr[f[n]+1]+1);
CROSSREFS
Sequence in context: A352541 A359438 A279408 * A022912 A318955 A173883
KEYWORD
nonn
AUTHOR
Katarzyna Matylla, Feb 25 2008
STATUS
approved