Ensemble de Mandelbrot

Ensemble de Mandelbrot

Messagepar P.Fradin » 15 Déc 2010 15:37

Suite à une suggestion d'Alphonse (fichier source):

Code: Tout sélectionner
TeXgraph#
{version 1.95-beta-10}
Cmd [Fenetre(-2+1.2*i,0.5-1.2*i,3.6+3.6*i), Marges(0,0,0,0), Border(0)];
    [OriginalCoord(1),IdMatrix()];

Graph objet1 = [
   NewBitmap(), T:=100,
   colors:= for N from 1 to T do  MixColor(darkblue,(1-(N-1)/(T-1)),yellow,(N-1)/(T-1))   od,
   Marges(0,0,0,0), size(9,1),
   nb:=MaxPixels(),
          for x from 0 to Re(nb) do
              for y from 0 to Im(nb) do
                  z:=0, N:=0, c:=Pixel2Scr(x+i*y),
                  repeat
                        z:=z^2+c, Inc(N,1)
                  until (N=T) Or (abs(z)>2) od,
                  Pixel([Scr2Pixel(c), colors[N]])
              od
          od
   ];


mandelbrot.png
mandelbrot.png (33.03 Kio) Consulté 10588 fois
P.Fradin
Avatar de l’utilisateur
P.Fradin
Administrateur du site
 
Messages: 1902
Inscription: 29 Oct 2008 15:04

Re: Mandelbrot & Co

Messagepar Alphonse Capriani » 15 Déc 2010 23:11

Parfait!

C'est limite si dans la rubrique contribution il faudrait pas rajouté une catégorie "Fractales". T'avais ouvert deux sujets la dessus sur l'ancien forum (voir ici et ici) auquel s'ajoute le sujet sur l'ensemble de Mandelbrot ici. On peut rajouter des L-systèmes et encore plein de trucs si on veut...
Ya Ba Da Ba Dooo!!!
Avatar de l’utilisateur
Alphonse Capriani
 
Messages: 576
Inscription: 18 Juil 2009 19:10
Localisation: East Harlem - NY

Re: Mandelbrot & Co

Messagepar P.Fradin » 15 Déc 2010 23:14

J'y penserai demain, c'est une bonne idée. C'est vrai que c'est un vaste domaine! Mais là je suis sur mon portable.
P.Fradin
Avatar de l’utilisateur
P.Fradin
Administrateur du site
 
Messages: 1902
Inscription: 29 Oct 2008 15:04

Re: Mandelbrot & Co

Messagepar Alphonse Capriani » 16 Déc 2010 08:18

Ok : super!

Mais t'inquète pas : ca presse pas...
Ya Ba Da Ba Dooo!!!
Avatar de l’utilisateur
Alphonse Capriani
 
Messages: 576
Inscription: 18 Juil 2009 19:10
Localisation: East Harlem - NY


Revenir vers Objets fractals

Qui est en ligne ?

Utilisateurs parcourant ce forum : Aucun utilisateur inscrit et 1 invité