|
| |
|
|
A065362
|
|
Rebase n from 4 to 2. Replace 4^k with 2^k in quaternary expansion of n.
|
|
2
| |
|
|
1, 2, 3, 2, 3, 4, 5, 4, 5, 6, 7, 6, 7, 8, 9, 4, 5, 6, 7, 6, 7, 8, 9, 8, 9, 10, 11, 10, 11, 12, 13, 8, 9, 10, 11, 10, 11, 12, 13, 12, 13, 14, 15, 14, 15, 16, 17, 12, 13, 14, 15, 14, 15, 16, 17, 16, 17, 18, 19, 18, 19, 20, 21, 8, 9, 10, 11, 10, 11, 12, 13, 12, 13, 14, 15, 14, 15, 16, 17
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Notation: (4)[n](2)
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,1000
|
|
|
EXAMPLE
| 24 = 120 -> 1(4)+2(2)+0(1) = 8 = a(24)
|
|
|
PROG
| (PARI) Rebase(x, b, c)= { local(d, e=0, f=1); while (x>0, d=x-b*(x\b); x\=b; e+=d*f; f*=c); return(e) } { for (n=1, 1000, write("b065362.txt", n, " ", Rebase(n, 4, 2)) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Oct 17 2009]
|
|
|
CROSSREFS
| A065361
Sequence in context: A064289 A078759 A095207 * A083219 A106249 A110516
Adjacent sequences: A065359 A065360 A065361 * A065363 A065364 A065365
|
|
|
KEYWORD
| base,easy,nonn
|
|
|
AUTHOR
| Marc LeBrun (mlb(AT)well.com), Oct 31 2001
|
| |
|
|
