OFFSET
0,1
REFERENCES
A. Knopfmacher, ``Rational numbers with predictable Engel product expansions,'' in G. E. Bergum et al., eds., Applications of Fibonacci Numbers. Vol. 5, pp. 421-427.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
FORMULA
a(n) ~ c^(phi^n), where phi = A001622 = (1+sqrt(5))/2 is the golden ratio and c = 1.705023526853159146712304952... . - Vaclav Kotesovec, Mar 06 2016
MATHEMATICA
t={1, 3}; Do[AppendTo[t, (t[[-1]]+1)*t[[-2]]-1], {n, 11}]; t[[1]]=4; t (* Vladimir Joseph Stephan Orlovsky, Jan 28 2012 *)
Flatten[{4, RecurrenceTable[{a[n+1] == a[n-1]*(a[n] + 1) - 1, a[1] == 3, a[2] == 3}, a, {n, 1, 12}]}] (* Vaclav Kotesovec, Mar 06 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved