login
A092778
Concatenate pairs of successive Fibonacci numbers.
1
1, 11, 12, 23, 35, 58, 813, 1321, 2134, 3455, 5589, 89144, 144233, 233377, 377610, 610987, 9871597, 15972584, 25844181, 41816765, 676510946, 1094617711, 1771128657, 2865746368, 4636875025, 75025121393, 121393196418
OFFSET
0,2
FORMULA
a(n) = A000045(n)*10^(A055642(A000045(n+1))) + A000045(n+1). - José de Jesús Camacho Medina, Dec 16 2016
MATHEMATICA
AA = Table[Fibonacci[n]*10^(Floor[Log[10, 10Fibonacci[n + 1]]]) + Fibonacci[n + 1], {n, 1, 12}] (* José de Jesús Camacho Medina, Dec 16 2016 *)
PROG
(PARI) glue(a, b)=a*10^logint(10*b, 10)+b
a(n)=glue(fibonacci(n), fibonacci(n+1)) \\ Charles R Greathouse IV, Dec 16 2016
CROSSREFS
Sequence in context: A042633 A197221 A093099 * A041248 A112063 A042615
KEYWORD
nonn,base
AUTHOR
Jorge Coveiro, Apr 14 2004
STATUS
approved