A075995 - OEIS

A075995

a(n) = Sum_{k=1..floor(n/2)} floor(n/k) for n >= 2, with a(1) = 1.

1, 2, 3, 6, 7, 11, 12, 16, 18, 22, 23, 29, 30, 34, 37, 42, 43, 49, 50, 56, 59, 63, 64, 72, 74, 78, 81, 87, 88, 96, 97, 103, 106, 110, 113, 122, 123, 127, 130, 138, 139, 147, 148, 154, 159, 163, 164, 174, 176, 182, 185, 191, 192, 200, 203, 211, 214, 218, 219, 231, 232

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

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

EXAMPLE

a(6) = floor(6/1) + floor(6/2) + floor(6/3) = 11.

MATHEMATICA

Table[If[n == 1, 1, Sum[Floor[n/i], {i, Floor[n/2]}]], {n, 80}] (* Wesley Ivan Hurt, Nov 26 2020 *)

PROG

(Python)

from math import isqrt