A220811 Numerators of the Verhulst sequence x(n+1)=4*x(n)-3*x(n)^2, x(0)=1/10.

1, 37, 10693, 84699253, 12357810823725973, 36165967884042486031784215609813, 10542455454648216809579521558960739092388747823498758873614315093

Offset

0,2

References

H. O. Peitgen and P. H. Richter, The Beauty of Fractals. Springer, 1986, p. 23f.

Links

Reinhard Zumkeller, Table of n, a(n) for n = 0..9

Eric Weisstein's World of Mathematics, Logistic Equation

Wikipedia, Logistic map

Prog

(Haskell)
import Data.Ratio ((%), numerator)
a220811 n = a220811_list !! n
a220811_list = map numerator vs where
   vs = iterate (\x -> x * (4 - 3 * x)) (1 % 10)
-- Reinhard Zumkeller, Dec 22 2012

Crossrefs

Cf. A051840, A220812 (denominators).

Sequence in context: A352467 A219001 A212945 * A129055 A193158 A202794

Adjacent sequences: A220808 A220809 A220810 * A220812 A220813 A220814

Keyword

nonn,frac

Author

Reinhard Zumkeller, Dec 22 2012

Status

approved