login
A074945
Number of k with 1<=k<=n such that gcd(n,k) = floor(n/k).
0
1, 0, 1, 2, 2, 1, 3, 2, 4, 3, 5, 2, 6, 4, 4, 6, 8, 4, 9, 4, 7, 7, 11, 5, 11, 8, 9, 7, 14, 6, 15, 9, 11, 11, 12, 9, 18, 12, 13, 10, 20, 8, 21, 11, 13, 15, 23, 10, 22, 13, 17, 15, 26, 13, 21, 15, 20, 19, 29, 10, 30, 20, 18, 20, 24, 14, 33, 19, 24, 16, 35, 15, 36, 24, 22, 22, 30, 18, 39
OFFSET
1,4
FORMULA
a(n) <= n/2 It seems that limit_inf n ->infinity a(n)/n = 0.1.....
PROG
(PARI) a(n)=sum(k=1, n, if(gcd(n, k)-floor(n/k), 0, 1))
CROSSREFS
Sequence in context: A346871 A375300 A291712 * A353068 A367292 A323479
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Oct 05 2002
STATUS
approved