Wissenschaft
Menschen Wissenschaft Politik Mystery Kriminalfälle Spiritualität Verschwörungen Technologie Ufologie Natur Umfragen Unterhaltung
weitere Rubriken
PhilosophieTräumeOrteEsoterikLiteraturAstronomieHelpdeskGruppenGamingFilmeMusikClashVerbesserungenAllmysteryEnglish
Diskussions-Übersichten
BesuchtTeilgenommenAlleNeueGeschlossenLesenswertSchlüsselwörter
Schiebe oft benutzte Tabs in die Navigationsleiste (zurücksetzen).

Mandelbrot-Programm

31 Beiträge ▪ Schlüsselwörter: Chaos, Mandelbrot ▪ Abonnieren: Feed E-Mail

Mandelbrot-Programm

08.12.2005 um 14:33
@kreis und Rocket

Vielleicht versteht Ihr nur das "damit ich Chaos forschen kann" falsch.

Das muss ja nicht heißen, dass er das Chaos erforschen will, sondern kann auch heissen, dass er einfach chaotisch forschen will.


melden

Mandelbrot-Programm

08.12.2005 um 14:38
hmmm....aber damit lässt sich nichts erforschen. ;)

man kann einfach nur bilder betrachten, die vom prog generiert werden.

zur ernsthaften forschung bedarf es schon gewisser, fachspezifischer grundlagen...

"You know how I stayed alive this long? Fear. Fearsome acts. A man steals from me, I cut off his hand. If he lies to me, I cut out his tongue. If he stands up against me, I cut off his head, stick it on a pike and lift it up for all to see. A spectacle of fearsome acts. That's what maintains the order of things. Fear."


melden

Mandelbrot-Programm

08.12.2005 um 14:40
das Mandelbrot-Programm benützt seine Vorgehensweise (iterationen) nur in farbbereich RGB was aufm Monitor sichtbar ist. Aber stell dir vor, man würde den kompletten Periodensystem verwenden, also auch die Tonfrequenzen, Mikrowellen, phsikalische Gesetze usw... dann dürfte das Bild so aussehen wie in der Realität


melden

Mandelbrot-Programm

08.12.2005 um 14:46
...desweiteren ist auch die "julia-menge" von grosser bedeutung.

also alles in allem, recht kompliziert.

"You know how I stayed alive this long? Fear. Fearsome acts. A man steals from me, I cut off his hand. If he lies to me, I cut out his tongue. If he stands up against me, I cut off his head, stick it on a pike and lift it up for all to see. A spectacle of fearsome acts. That's what maintains the order of things. Fear."


melden

Mandelbrot-Programm

08.12.2005 um 14:48
vergiss es. ich muss was anderes suchen


melden

Mandelbrot-Programm

08.12.2005 um 14:56
ja da hast du recht. in anderen worten: "rückkoppelung" damit verwenden sie für simulationen aller arten: atomsimulation, urknallsimulation usw..


melden

Mandelbrot-Programm

08.12.2005 um 22:36
Anhang: datei1.jpg (117, KB)
Das hier ist das Herzstück eines von mir (recht stümperhaft) programmierten
Apfelmännchen-Generators :D
Mittlerweile ist es auch kein Apfelmännchen mehr, da die Formel leicht verändert wurde. Ich wollte einfach nur schöne Bilder erzeugen.

kurz zum Prinzip:
Das Programm rechnet für jeden Punkt einer Matrix (begrenzt durch die Konstanten a1,a2,b1,b2) die Anzahl der Durchläufe einer For to next Schleife bis zum Erreichen eines vorgegebenen Abbruchkriteriums.

Diese Anzahl lässt sich dann wunderschön als Farbcode nutzen ;)


Private Sub Command1_Click()

Const Feld = 2000 'Kantenlänge der Matrix
Dim aFaktor, bFaktor, a, b, aR, bR, I, X, Y, X1, Y1, Matrix(Feld, Feld), FIndex

Const a1 = -0.35
Const a2 = -0.31
Const b1 = 0.63
Const b2 = 0.73

'Nullsetzten
For a = 0 To Feld
For b = 0 To Feld
Matrix(a, b) = 0
Next b
Next a

aFaktor = Abs(a1 - a2) / Feld
bFaktor = Abs(b1 - b2) / Feld

For a = 1 To Feld
aR = a * aFaktor + a1
For b = 1 To Feld
bR = b * bFaktor + b1
X = 0
Y = 0
For I = 1 To 100
X1 = X ^ 2 - Y ^ 2 + aR
Y1 = 2 * X * Y + bR - Sin(0.5 * Y)
X = X1
Y = Y1
If X ^ 2 + Y ^ 2 > 2 Then 'Abbruchbedingung erfüllt "2"
Matrix(a, b) = I
I = 101
End If
Next I
Next b
Next a

'Ausgabe
Open ".......\DATEI1.txt" For Append As #1
' Datei schließen, bevor sie in einem anderen Modus erneut
Write #1, Feld 'Zeilenzahl
Write #1, Feld 'Spaltenzahl
DrawWidth = 2
For a = 1 To Feld
For b = 1 To Feld
If Not Matrix(a, b) = 0 Then
Circle (b * 25 * 200 / Feld, a * 25 * 200 / Feld), 5 * 200 / Feld, RGB(255 * a / Feld, 255 - Matrix(a, b) * 1.5, 255 * b / Feld)
Else
Circle (b * 25 * 200 / Feld, a * 25 * 200 / Feld), 5 * 200 / Feld, RGB(0, 0, 0)
End If

Write #1, Matrix(a, b)
Next b
Next a


' geöffnet wird.
Close #1

End Sub


Und im Anhang findet Ihr mein Lieblingsbild - dummerweise hab ich die Parameter dafür vergessen :(

Liebe Esoteriker, seid gewarnt, meine kabbalistische Quersumme ist die E I N S
-----------------------------
Nur Atheisten kommen in den Himmel! Ihre Nächstenliebe ist nicht gottgeschuldet, sondern ehrlich.



melden

Mandelbrot-Programm

08.12.2005 um 22:38
kennt jemand vieleicht die kokosschnitte theorie?

Tja, wo bin ich


melden

Mandelbrot-Programm

09.12.2005 um 00:32
lol witzbold.

@mso123: was ist das für eine sprache. Sieht aus wie VB oder Delphi. ich muss nur pixeldraw oder dotdraw von openGL für C++ rausfinden dann werd ich auch simulationen erstellen. konnte nur dumme 3d-polygone erstellen.
dann benenne ich sie vielleicht mal in suppenschimmel-theorie

Das Leben ist ein unsichtbarer Krieg.
Warum ist die Menschheit immer noch am scheitern, wo ich doch geboren bin?



melden

Mandelbrot-Programm

09.12.2005 um 00:34
aber das bild sieht sehr interessant aus.

Das Leben ist ein unsichtbarer Krieg.
Warum ist die Menschheit immer noch am scheitern, wo ich doch geboren bin?



melden

Ähnliche Diskussionen
Themen
Beiträge
Letzte Antwort
Wissenschaft: Weltuntergang, die verschiedenen Szenarien.
Wissenschaft, 857 Beiträge, am 30.07.2011 von Zenit
canpornpoppy am 02.12.2007, Seite: 1 2 3 4 ... 40 41 42 43
857
am 30.07.2011 »
von Zenit
Wissenschaft: Chaosforschung
Wissenschaft, 28 Beiträge, am 21.08.2006 von bofh
derkasi am 19.08.2006, Seite: 1 2
28
am 21.08.2006 »
von bofh