OFFSET
1,2
COMMENTS
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..98
FORMULA
MATHEMATICA
RecurrenceTable[{a[n]==Fibonacci[n]*a[n-1]+3, a[1]==1}, a, {n, 1, 20}]
nxt[{n_, a_}]:={n+1, a*Fibonacci[n+1]+3}; NestList[nxt, {1, 1}, 20][[;; , 2]] (* Harvey P. Dale, Sep 04 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Feb 20 2014
STATUS
approved