Nuages de points
Chaque courbe de Hénon est générée à partir de deux équations quadratique. L'une donne la valeur de X, l'autre celle de Y. Chacune des deux nouvelles valeurs sert pour calculer les suivantes et le point correspondant est placé.
Pour la première courbe de Henon, prendre A=1.4 et B=0.3.
Xnew = 1 - A*X2 + Y
Ynew = B*X
.
Pour obtenir une deuxième courbe de Hénon:
Pour la première courbe de Henon, prendre A=1.4 et B=0.3.
Xnew = 1 - A*X2 + Y
Ynew = B*X
.
|
# Commande principale: demarrer
pour new # set defaults, screen, pen et tortue init ftd [400 400] fcfg noir fcc vert levecrayon cachetortue fin pour initialise donne "x 0 donne "y moins 0.2 donne "xscale 128 donne "yscale 440 donne "alpha 1.4 donne "beta 0.3 fin pour demarrer new initialise fcc vert fixeformecrayon 1 # arrondi pen forme repete 40000 [henon] fin pour henon donne "xnew 1 - :alpha*(puissance :x 2) + :y donne "ynew :beta * :x point liste (:xnew*:xscale) (:ynew*:yscale) donne "x :xnew donne "y :ynew fin |
Pour obtenir une deuxième courbe de Hénon:
|
pour initialise donne "X 0 donne "Y 0 donne "XScale 40 donne "YScale 40 donne "Alpha 0.2 donne "Beta 0.9991 fin |
demarrer
