A080585 Partial sums of A080584.

0, 0, 0, 1, 2, 3, 3, 3, 3, 3, 3, 3, 4, 5, 6, 7, 8, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37

Offset

0,5

Links

Table of n, a(n) for n=0..81.

Formula

Also: a(n) = 3*2^A000523(A002264(n+6)/2)*(1-3*A080584(n))+A080584(n)*(n+7)-3. - Antonio G. Astudillo (afg_astudillo(AT)hotmail.com), Feb 24 2003

Mathematica

Accumulate[Flatten[Table[{PadRight[{}, 3*2^n, 0], PadRight[{}, 3*2^n, 1]}, {n, 0, 4}]]] (* Harvey P. Dale, Jun 01 2012 *)

Crossrefs

Sequence in context: A243282 A093390 A025789 * A295977 A089361 A035441

Adjacent sequences: A080582 A080583 A080584 * A080586 A080587 A080588

Keyword

nonn

Author

N. J. A. Sloane, Feb 23 2003

Status

approved