A369183 a(n) = n - A329004(n).
0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 2, 3, 4, 5, 0, 1, 0, 1, 2, 3, 0, 1, 2, 3, 4, 5, 0, 1, 2, 3, 4, 5, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 0, 1, 2, 3, 4, 5, 0, 1, 2, 3, 4, 5, 0, 1, 2, 3, 4, 5, 6
Offset: 1
Keywords
Examples
a(15) = 3 because the largest Ramanujan's largely composite number below 15 is 12, and 15-12=3.
Programs
-
Mathematica
dmax = 0; nmax = 1; seq = {}; Do[If[(d = DivisorSigma[0, n]) >= dmax, dmax = d; nmax = n]; AppendTo[seq,n- nmax], {n, 1, 102}];seq (* James C. McMahon, Jan 28 2024 *)