|
Search: id:A093048
|
|
|
| A093048 |
|
n minus exponent of 2 in n, a(0) = 0. |
|
+0 2
|
|
| 0, 1, 1, 3, 2, 5, 5, 7, 5, 9, 9, 11, 10, 13, 13, 15, 12, 17, 17, 19, 18, 21, 21, 23, 21, 25, 25, 27, 26, 29, 29, 31, 27, 33, 33, 35, 34, 37, 37, 39, 37, 41, 41, 43, 42, 45, 45, 47, 44, 49, 49, 51, 50, 53, 53, 55, 53, 57, 57, 59, 58, 61, 61, 63, 58, 65, 65, 67, 66, 69
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
FORMULA
|
Recurrence: a(2n) = a(n) + n - 1, a(2n+1) = 2n + 1.
G.f.: sum(k>=0, t(t^3+t^2+1)/(1-t^2)^2, t=x^2^k).
|
|
PROGRAM
|
(PARI) a(n)=if(n<1, 0, if(n%2==0, a(n/2)+n/2-1, n))
|
|
CROSSREFS
|
a(n) = n - A007814(n) = A093049(n) + 1, n>0.
a(n) is the exponent of 2 in A002689(n-1), A014070(n), A060690(n), A075101(n).
Sequence in context: A059319 A019828 A115207 this_sequence A141732 A008623 A035546
Adjacent sequences: A093045 A093046 A093047 this_sequence A093049 A093050 A093051
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Ralf Stephan (ralf(AT)ark.in-berlin.de), Mar 16 2004
|
|
|
Search completed in 0.002 seconds
|