A138529 - OEIS

%I #13 Jan 31 2018 04:01:04

%S 1,2,3,5,6,8,11,12,14,17,21,26,27,29,32,36,41,47,48,50,53,57,62,68,75,

%T 83,84,86,89,93,98,104,111,119,128,138,149,150,152,155,159,164,170,

%U 177,185,194,204,215,227,228,230,233,237,242,248,255,263,272,282,293,305,318,332,333,335,338

%N a(n) = Sum_{k=1..n} A138528(k).

%H Ivan Neretin, <a href="/A138529/b138529.txt">Table of n, a(n) for n = 1..10000</a>

%t Accumulate@Nest[Flatten@Join[{1}, Range[Accumulate@#]] &, {1}, 4] (* _Ivan Neretin_, Jan 30 2018 *)

%Y Cf. A138528.

%K easy,nonn

%O 1,2

%A _Leroy Quet_, Mar 23 2008