login
A220811
Numerators of the Verhulst sequence x(n+1)=4*x(n)-3*x(n)^2, x(0)=1/10.
3
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
KEYWORD
nonn,frac
AUTHOR
Reinhard Zumkeller, Dec 22 2012
STATUS
approved