A189635 Partial sums of A189632.
0, 0, 1, 1, 1, 2, 3, 3, 3, 3, 3, 4, 4, 4, 5, 6, 6, 6, 7, 7, 7, 7, 7, 8, 8, 8, 9, 9, 9, 10, 10, 10, 11, 12, 12, 12, 12, 12, 13, 13, 13, 14, 15, 15, 15, 16, 16, 16, 16, 16, 17, 17, 17, 18, 19, 19, 19, 19, 19, 20, 20, 20, 21, 21, 21, 22, 22, 22, 23, 24, 24, 24, 24, 24, 25, 25, 25, 26, 27, 27, 27, 27
Offset: 1
Keywords
Programs
-
Mathematica
(See A189632.)
Formula
s(n)=s([(n+2)/3])+[n/3]-s([n/3]), where s(0)=0, s(1)=0.
Comments