A082694 Partial sums of A082693.

1, 3, 4, 6, 10, 12, 13, 15, 19, 27, 31, 33, 34, 36, 40, 48, 64, 72, 76, 78, 79, 81, 85, 93, 109, 141, 157, 165, 169, 171, 172, 174, 178, 186, 202, 234, 298, 330, 346, 354, 358, 360, 361, 363, 367, 375, 391, 423, 487, 615, 679, 711, 727, 735, 739, 741, 742, 744

Offset

1,2

Links

Table of n, a(n) for n=1..58.

Mathematica

f[n_]:=Module[{st=2^Range[0, n]}, Join[st, Reverse[Most[Rest[st]]]]]; Accumulate[ Flatten[Array[f, 10]]] (* Harvey P. Dale, May 09 2012 *)

Crossrefs

Sequence in context: A301759 A322457 A137951 * A004793 A336909 A031132

Adjacent sequences: A082691 A082692 A082693 * A082695 A082696 A082697

Keyword

nonn

Author

Benoit Cloitre, Apr 12 2003

Status

approved