1,7

Table of n, a(n) for n=1..75.

Sum_{k=1..n} (ceiling(n/k) - round(n/k)). - Vladeta Jovovic, Mar 01 2004

(MAGMA) [&+[(Ceiling(n/k)-Round(n/k)): k in [1..n]]: n in [1..80]]; // Vincenzo Librandi, Jul 30 2017

(PARI) a(n) = sum(k=1, n, f = frac(n/k); f && (f < 1/2)); \\ Michel Marcus, Jul 30 2017

Cf. A075989, A076990.

Sequence in context: A098822 A131597 A077070 * A029150 A255246 A055923

Adjacent sequences: A075985 A075986 A075987 * A075989 A075990 A075991

nonn

Clark Kimberling, Sep 28 2002

approved