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”).

A074944
Number of k with 1 <= k <= n such that gcd(n,k)=tau(k), where tau is A000005, number of divisors function.
1
1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 4, 1, 2, 2, 2, 1, 3, 1, 3, 2, 2, 1, 4, 1, 2, 1, 3, 1, 5, 1, 3, 2, 2, 1, 3, 1, 2, 2, 3, 1, 5, 1, 3, 2, 2, 1, 5, 1, 2, 2, 3, 1, 3, 1, 4, 2, 2, 1, 5, 1, 2, 2, 5, 1, 5, 1, 3, 2, 2, 1, 5, 1, 2, 2, 3, 1, 5, 1, 4, 2, 2, 1, 7, 1, 2, 2, 5, 1, 4, 1, 3, 2, 2, 1, 9, 1, 2, 2, 3, 1, 5, 1, 6, 2
OFFSET
1,2
LINKS
FORMULA
Sum_{i=1..n} a(i) seems to be asymptotic to c*n*log(n) with 0.5 < c < 0.6.
PROG
(PARI) a(n)=sum(k=1, n, if(gcd(n, k)-numdiv(k), 0, 1))
CROSSREFS
Cf. A000005.
Sequence in context: A161288 A185217 A131456 * A245041 A161315 A161249
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Oct 05 2002
STATUS
approved