1,2

a(8) has 25374 digits.

t = {1, 2}; For[i = 1, i <= 5, i++, l = Length[t]; t = Append[t, Fibonacci[t[[l]] + t[[l - 1]]]]]; t

Sequence in context: A152446 A055937 A090255 this_sequence A099205 A051005 A002163

Adjacent sequences: A080666 A080667 A080668 this_sequence A080670 A080671 A080672

nonn

Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Mar 02 2003