|
%I #14 Sep 08 2022 08:46:24
%S 1,4,9,16,26,38,53,70,90,113,138,166,197,230,266,305,346,390,437,487,
%T 540,596,654,715,779,846,916,989,1065,1144,1226,1311,1399,1490,1584,
%U 1681,1781,1884,1990,2099,2211,2326,2444,2565,2689,2816,2946,3079,3215,3354,3496,3641,3790,3942,4097,4255,4416
%N Partial sums of A057640.
%F a(n) = A024916(n) + A328367(n).
%o (Magma) f:=func<n| Floor(a+Exp(a)*Log(a)) where a is HarmonicNumber(n) >; [&+[f(k):k in [1..n]]:n in [1..57]]; // _Marius A. Burtea_, Nov 18 2019
%Y Cf. A000203, A001008, A002805, A024916, A057640, A057641, A328367.
%K nonn
%O 1,2
%A _Omar E. Pol_, Oct 26 2019
|
