A282237 a(n) = Fibonacci(n) represented in bijective base-6 numeration.
1, 1, 2, 3, 5, 12, 21, 33, 54, 131, 225, 356, 625, 1425, 2454, 4323, 11221, 15544, 31165, 51153, 122362, 213555, 336361, 554356, 1335161, 2333561, 4113162, 6451163, 14564365, 25455612, 44464421, 114364433, 163313254, 322122131, 525435425, 1251561556
Offset: 1
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..1000
- Wikipedia, Bijective numeration
Programs
-
Maple
a:= proc(n) local b, d, l, m; l:= NULL; b, m:= 6, combinat[fibonacci](n); while m>0 do d:= irem(m, b, 'm'); if d=0 then d:=b; m:=m-1 fi; l:= d, l od; parse(cat(l)) end: seq(a(n), n=0..40);