A173717 Sum of n mod m, summed over semiprimes m = 4, 6, 9, ..., smallest semiprime >= n.

1, 2, 3, 0, 6, 2, 11, 10, 4, 7, 22, 17, 22, 13, 18, 36, 43, 35, 42, 35, 21, 28, 59, 58, 42, 51, 79, 72, 83, 63, 74, 81, 59, 70, 82, 112, 126, 102, 116, 157, 173, 148, 164, 154, 146, 116, 179, 186, 154, 186, 153, 193, 212, 216, 180, 237, 200, 220, 300, 287, 309, 269, 324, 343, 301, 329, 353, 339

Offset: 1

Author

Juri-Stepan Gerasimov, Nov 25 2010

Keywords

• nonn
• less

Crossrefs

Cf. A106325.

Programs

Maple

A173717 := proc(n) a := 0 ; for i from 1 do s := A001358(i) ; a := a + (n mod s) ;  if s >= n then return a; end if; end do: end proc: # R. J. Mathar, Nov 26 2010

Extensions

Corrected by R. J. Mathar, Nov 26 2010