[go: up one dir, main page]

login
A245540
Partial sums of A245180.
4
1, 2, 5, 6, 14, 17, 31, 32, 40, 48, 72, 75, 99, 113, 165, 166, 174, 182, 206, 214, 278, 302, 414, 417, 441, 465, 537, 551, 663, 715, 931, 932, 940, 948, 972, 980, 1044, 1068, 1180, 1188, 1252, 1316, 1508, 1532, 1724, 1836, 2252, 2255, 2279, 2303, 2375, 2399, 2591, 2663, 2999, 3013, 3125, 3237
OFFSET
1,2
FORMULA
a(n) = (A245542(n) - 1)/8. - Omar E. Pol, Mar 07 2015
MATHEMATICA
b[n_] := b[n] = Which[n == 1, 1, Mod[n, 2] == 0, b[n/2], Mod[n, 4] == 3, 2b[(n-1)/2] + b[n-2], True, 8b[(n-1)/4]];
Accumulate[Array[b, 58]] (* Jean-François Alcover, Oct 01 2018 *)
CROSSREFS
KEYWORD
nonn,look
AUTHOR
N. J. A. Sloane, Jul 26 2014
STATUS
approved