OFFSET
0,2
MATHEMATICA
f[n_]:=Module[{fn=Fibonacci[n]}, (fn^(n+1)-1)/(fn-1)]; Join[{1, 2, 3}, f/@Range[3, 20]] (* Harvey P. Dale, Mar 01 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula and Gary W. Adamson, May 27 2008
EXTENSIONS
Edited by N. J. A. Sloane, May 28 2008
STATUS
approved