%I #11 Mar 16 2020 19:02:20
%S 1,3,6,16,21,32,39,50,64,85,96,139,152,175,204,224,241,287,306,391,
%T 422,465,488,535,557,602,617,704,733,826,857,878,937,1018,1065,1239,
%U 1276,1359,1420,1513,1554,1649,1692,1863,1980,2067,2114,2197,2227,2313,2426
%N Partial sums of A230625.
%C Although A230625 is a very irregular function, here the graph is much smoother, and it appears that a(n) approx= 1.2*n^2. It would be nice to have a more precise estimate.
%H N. J. A. Sloane, <a href="/A291803/b291803.txt">Table of n, a(n) for n = 1..10000</a>
%t A230625 = Cases[Import["https://oeis.org/A230625/b230625.txt", "Table"], {_, _}][[All, 2]];
%t Accumulate[A230625] (* _Robert Price_, Mar 16 2020 *)
%Y Cf. A080670, A287881, A287882, A287874, A230625.
%K nonn
%O 1,2
%A _N. J. A. Sloane_, Sep 06 2017
|