login
A328367
Partial sums of A057641.
1
0, 0, 1, 1, 5, 5, 12, 14, 21, 26, 39, 39, 56, 65, 77, 85, 108, 113, 140, 148, 169, 189, 223, 224, 257, 282, 312, 329, 375, 382, 432, 454, 494, 531, 577, 583, 645, 688, 738, 757, 827, 846, 920, 957, 1003, 1058, 1140, 1149, 1228, 1274, 1344, 1391, 1486, 1518, 1601, 1639, 1720, 1794, 1901, 1903, 2015, 2096
OFFSET
1,5
FORMULA
a(n) = A328363(n) - A024916(n).
PROG
(Magma) f:=func<n| Floor(a+Exp(a)*Log(a))-DivisorSigma(1, n) where a is HarmonicNumber(n) >; [&+[f(k):k in [1..n]]:n in [1..62]]; // Marius A. Burtea, Nov 18 2019
KEYWORD
nonn
AUTHOR
Omar E. Pol, Oct 26 2019
STATUS
approved