Plik:Bifurcation diagram of complex quadratic map.png

Treść strony nie jest dostępna w innych językach.
Z Wikibooks, biblioteki wolnych podręczników.

Bifurcation_diagram_of_complex_quadratic_map.png(640 × 480 pikseli, rozmiar pliku: 9 KB, typ MIME: image/png)

Ten plik znajduje się w Wikimedia Commons i może być używany w innych projektach. Poniżej znajdują się informacje ze strony opisu tego pliku.

Opis

Opis
English: Bifurcation diagram of complex quadratic map.

Horizontal axis ( real slice of Mandelbrot set ) is divided int 3 segments with nonlinear scale:

  • periodic part with period doubling cascade
    • is period 1 part.
    • is rest of periodic part
  • point is the Myrberg-Feigenbaum point
  • is a chaotic part, main antenna, the shrub of family

Colors:

  • red and blue show repelling (unstable) period 1 and 2 orbits
  • green show attracting orbits

Each window has non-linear, i.e. logarithmic x-axis scale:

                case TypSkalOsiXY of

                        liniowe : begin
                                    okno.Ax:=(okno.Dxe)/(okno.dx);  { XE=Ax*x+Bx  }
                                    okno.Bx:=XEmin-(okno.Ax*Xmin);
                                    okno.KrokX:=(okno.Dx)/(okno.Dxe);

                                    okno.Ay:=(okno.Dye)/(okno.dy);
                                    okno.By:=YEmin-(okno.Ay*Ymin);
                                    okno.KrokY:=(okno.Dy)/(okno.dye);
                                  end;

                        LogRozsz: begin  { nieliniowa , tj. logarytmiczna  skala osi x }
                                    okno.LrMin:= 0;   { logarytm naturalny }
                                    okno.LrMax:=-6;
                                    okno.dLr:=okno.LrMax-okno.LrMin;

                                    okno.XlrMin:=exp(okno.LrMin);  { Xlr = exp(Lr) }
                                    okno.XlrMax:=exp(okno.LrMax);
                                    okno.dXlr:=okno.XlrMax-okno.XlrMin;

                                    okno.Ayr:=(okno.Dye)/(okno.dy); { liniowa skala osi y }
                                    okno.Byr:=YEmin-(okno.Ayr*Ymin);
                                    okno.KrokYr:=(okno.Dy)/(okno.dye);
                                  end;

                        LogZwez : begin
                                    okno.LzMin:= -6;
                                    okno.LzMax:=  0;
                                    okno.dLz:=okno.LzMax-okno.LzMin;

                                    okno.XlzMin:=exp(okno.LzMin);
                                    okno.XlzMax:=exp(okno.LzMax);
                                    okno.dXlz:=okno.XlzMax-okno.XlzMin;

                                    okno.Ayz:=(okno.Dye)/(okno.dy); { liniowa skala osi y }
                                    okno.Byz:=YEmin-(okno.Ayz*Ymin);
                                    okno.KrokYz:=(okno.Dy)/(okno.dye);
                                  end;
                end; { case  ... }


Main program:

PROGRAM diag321;



  { program rysuje diagram bifurkacyjny y[n+1]=y[n]*y[n]+x,
  {  x: -2.0< x <-1.41 }
  {  y: -2.0< y <2.0  }
  {  nieliniowe , zmienne w 3 oknach skalowanie osi x }
  { rysuje tez punkty stale nieprzyciagajace !!!!! }



USES {moduly standardowe}
     Crt,Graph,
     {moje moduly}
     GrafM,
     OknaM,
     fractalnyM,
     BmpM;

VAR Okno1,okno2,okno3:OkiennyT;
    Bok:integer;


BEGIN
  Opengraf;
  Bok:=Round(GetMaxx/7);

  Kojarz(okno3,-0.200,0.25,-2,2,logRozsz,(6*bok)+2,(7*bok),0,GetMaxY);
  Diagram(okno3,50,10); {unit FractalnyM}

  Kojarz(okno2,-1.401,-0.200,-2,2,logZwez,(3*bok)+1,(6*bok)+1,0,GetMaxY);
  Diagram(okno2,100,20);

  Kojarz(okno1,-2.000,-1.401,-2,2,logRozsz,0,3*bok,0,getMaxY);
  Diagram(okno1,100,200);


  ScreenCopy('b',640,480);
  Repeat until KeyPressed;
  CloseGraph;

END.
Data
Źródło Praca własna
Autor Soul windsurfer
Inne wersje

Licencja

Ja, właściciel praw autorskich do tego dzieła, udostępniam je na poniższej licencji
w:pl:Licencje Creative Commons
uznanie autorstwa na tych samych warunkach
Wolno:
  • dzielić się – kopiować, rozpowszechniać, odtwarzać i wykonywać utwór
  • modyfikować – tworzyć utwory zależne
Na następujących warunkach:
  • uznanie autorstwa – musisz określić autorstwo utworu, podać link do licencji, a także wskazać czy utwór został zmieniony. Możesz to zrobić w każdy rozsądny sposób, o ile nie będzie to sugerować, że licencjodawca popiera Ciebie lub Twoje użycie utworu.
  • na tych samych warunkach – Jeśli zmienia się lub przekształca niniejszy utwór, lub tworzy inny na jego podstawie, można rozpowszechniać powstały w ten sposób nowy utwór tylko na podstawie tej samej lub podobnej licencji.

Podpisy

Dodaj jednolinijkowe objaśnienie tego, co ten plik pokazuje
Bifurcation diagram of complex quadratic map

Obiekty przedstawione na tym zdjęciu

przedstawia

image/png

c9f121466739de8672972b67751538abb57fa9ad

480 piksel

640 piksel

Historia pliku

Kliknij na datę/czas, aby zobaczyć, jak plik wyglądał w tym czasie.

Data i czasMiniaturaWymiaryUżytkownikOpis
aktualny16:14, 3 sie 2023Miniatura wersji z 16:14, 3 sie 2023640 × 480 (9 KB)Obscure2020Optimized with OxiPNG and ZopfliPNG.
21:02, 18 lis 2022Miniatura wersji z 21:02, 18 lis 2022640 × 480 (12 KB)Soul windsurferUploaded own work with UploadWizard

Poniższa strona korzysta z tego pliku:

Globalne wykorzystanie pliku

Ten plik jest wykorzystywany także w innych projektach wiki: