OFFSET
0,1
MAPLE
with(combinat) : catL := proc(i, j) i*10^(max(1, ilog10(j)+1))+j ; end: A134549 := proc(n) local f ; f := Fib(n) ; catL( catL(fibonacci(n+4), fibonacci(n+2)), fibonacci(n)) ; end: seq(A134549(n), n=0..28) ; # R. J. Mathar, Jan 30 2008
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Deuard Worthen (deuard(AT)tx.rr.com), Jan 23 2008, at the suggestion of N. J. A. Sloane
EXTENSIONS
More terms from R. J. Mathar, Jan 30 2008
STATUS
approved