login
A085652
Fibonacci sequence in base 2 of the alternate number system.
2
1, 1, 2, 11, 21, 112, 221, 1221, 11122, 22111, 122121, 1121112, 2212121, 12222121, 112211122, 222122211, 2111222221, 12111122112, 111112121221, 212112212221, 1212122111122, 11121211221111, 21222222221121, 122121211211112, 1121121211121121, 2212212111221121
OFFSET
1,3
REFERENCES
R. R. Forslund, A Logical Alternative to the existing positional number system. Souhtwest Journal of Pure and Applied Mathematics. Dec. 1995. Vol. 1
FORMULA
a(n) = A007931(A000045(n)).
MAPLE
a:= proc(n) local d, l, m;
m:= combinat[fibonacci](n); l:= NULL;
while m>0 do d:= irem(m, 2, 'm');
if d=0 then d:=2; m:= m-1 fi;
l:= d, l
od; parse(cat(l))
end:
seq(a(n), n=1..30); # Alois P. Heinz, Jul 25 2012
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Bob Forslund (forslund(AT)tbaytel.net), Jul 11 2003
EXTENSIONS
More terms from David Wasserman, Feb 08 2005
STATUS
approved