login
A182241
a(n) = A161151(2*n)/2
2
3, 10, 7, 36, 11, 26, 15, 136, 19, 42, 23, 100, 27, 58, 31, 528, 35, 74, 39, 164, 43, 90, 47, 392, 51, 106, 55, 228, 59, 122, 63, 2080, 67, 138, 71, 292, 75, 154, 79, 648, 83, 170, 87, 356, 91, 186, 95, 1552, 99
OFFSET
1,1
FORMULA
a(n) = A161151(2*n)/2
a((2*n-1)*2^p) = 2^(2*p+2)*n - 2*2^(2*p) + 2^p, p >= 0.
MAPLE
nmax:=49: for p from 0 to ceil(simplify(log[2](nmax))) do for n from 1 to ceil(nmax/(p+2)) do a((2*n-1)*2^p) := 2^(2*p+2)*n - 2*2^(2*p) + 2^p od: od: seq(a(n), n=1..nmax);
CROSSREFS
Sequence in context: A373866 A185139 A300786 * A281178 A280461 A373128
KEYWORD
nonn,easy
AUTHOR
Johannes W. Meijer, Dec 24 2012
STATUS
approved