Die Suche ergab 149 Treffer

von Skylo
2. Dez 2007 22:32
Forum: Archiv
Thema: H5 6.2
Antworten: 48
Zugriffe: 9384

(generate-paths 'a '( (a b) (b c) (c a)) '())
ergibt derzeit
(list (list 'a 'b (list 'b 'c (list 'c 'a))) (list 'c 'a (list 'b 'c (list 'a 'b))))
Was aber widermal scheiss Darstellung ist ;)

Aber richtig isses doch erstmal oder?
von Skylo
25. Nov 2007 19:58
Forum: Archiv
Thema: Aufgabe H4 7.2???
Antworten: 6
Zugriffe: 1219

also wenn n = 0 ist dann gibt der bei mir einfach wieder die Kette aus... expand-ntimes N string rules -> string bei n=0 Ansonsten führt er ja expand-once min. 1 mal aus! Und zur Frage mit der Rekursion... Man muss natürlich dann expand-once auf das Ergebnis aus dem ersten Mal expand anwenden. Meine...
von Skylo
21. Nov 2007 16:41
Forum: Archiv
Thema: HA4 7
Antworten: 38
Zugriffe: 5584

übrigens probiert mal diese hier aus .... (define axiom-kochflocke '(F - - F - - F)) (define rules-kochflocke '( ( F ( F + F - - F + F )))) (define axiom-hilbert '(X)) (define rules-hilbert '( (X (- Y F + X F X + F Y -)) (Y (+ X F - Y F Y - F X +)))) (define axiom-levy '( F)) (define rules-levy '( (...
von Skylo
21. Nov 2007 16:40
Forum: Archiv
Thema: HA4 7
Antworten: 38
Zugriffe: 5584

nee in der ausführung war es genauso lang beim Sierpinski !

Meine Funktion war total easy geschriebe und draw-lsystem is ja auch nichts was irgendwie viel Code braucht ;)

Aber ich hab gemerkt bei einer rekursionstiefe von 15 und einer Levy Kurve is ein unterschied von 7 zu 5 sekunden mit map!
von Skylo
20. Nov 2007 21:58
Forum: Archiv
Thema: HA4 7
Antworten: 38
Zugriffe: 5584

cons?

Das funzt!
von Skylo
20. Nov 2007 21:06
Forum: Archiv
Thema: HA4 7
Antworten: 38
Zugriffe: 5584

nee wieso sollte er...

ich kann doch genauso gut rekursiv die liste durchgehen, mehr macht map auch nicht ;)
von Skylo
20. Nov 2007 20:30
Forum: Archiv
Thema: HA4 7
Antworten: 38
Zugriffe: 5584

ich habs auch ohne map und hilfsfunktion hingekriegt ;) die draw-lsystem!
von Skylo
20. Nov 2007 15:03
Forum: Archiv
Thema: HA4 7
Antworten: 38
Zugriffe: 5584

gelöscht und gelöst!

Anderes Problem!

Wie kann ich in der draw-lsystem mehrere befehle hintereinander ausführen.

Ich muss ja einmal das (draw xy) ausführen und dann nochmal rekursion!

[Edit:]

OK MAN kann auch die Aufgabenstellung lesen und merken das cons genau das tut ;)


FERTISCH !!!
von Skylo
19. Nov 2007 17:04
Forum: Archiv
Thema: HA4 7
Antworten: 38
Zugriffe: 5584

Code: Alles auswählen

(list '+ (list 'G '+) '+ '+ '+ (list '+ 'F) '+)
Diese Liste kann mein flatten-expansion irgendwie nich korrekt verarbeiten :(((

Hat jemand ein Ähnliches Problem? seh keinen Fehler im Code!
von Skylo
18. Nov 2007 20:00
Forum: Archiv
Thema: HA4 7
Antworten: 38
Zugriffe: 5584

(list 'G '+ '+ (list '+ 'F)) (list '+ '+ 'F '+ '+ '+ (list '+ 'F)) Sofern meine Ausgabe... Leider wird das letzte Element nicht ausgewertet bei (expand-ntimes) expand-once funktioniert soweit, aber ich musste im cond etwas verändert damit kein Fehler entsteht. Jemand ein ähnliches problem gehabt?
von Skylo
15. Nov 2007 21:15
Forum: Archiv
Thema: HA3 7
Antworten: 96
Zugriffe: 10155

bei mir wird auch bei jedem aufruf von (perm) flatten-once ausgeführt!

Hmmm...
von Skylo
15. Nov 2007 21:03
Forum: Archiv
Thema: HA3 7
Antworten: 96
Zugriffe: 10155

mit einer weiteren hilfsfunktion komme ich nun auf dieses Ergebnis (list (list 1 2) (list 2 1)) (list (list 1 2 3) (list 2 1 3) (list 2 3 1) (list 1 3 2) (list 3 1 2) (list 3 2 1)) (list (list 1 2 3 4) (list 2 1 3 4) (list 2 3 1 4) (list 2 3 4 1) (list 1 3 2 4) (list 3 1 2 4) (list 3 2 1 4) (list 3 ...
von Skylo
15. Nov 2007 20:59
Forum: Archiv
Thema: HA3 7
Antworten: 96
Zugriffe: 10155

gelöscht
von Skylo
15. Nov 2007 20:53
Forum: Archiv
Thema: HA3 7
Antworten: 96
Zugriffe: 10155

hmmm ich hatte mal ne ähnlihce ausgabe bevor ich alles neu programmiert hab! Nämlich wie gesagt insert-everywhere. Die Hauptzeile meines Programms ist wohl (map insert-x (perm (rest alon))) Perm wird solang aufgerufen bis die Liste nur 1 Lang ist und gibt dann nur die Einelement List zurück. Also me...
von Skylo
15. Nov 2007 20:06
Forum: Archiv
Thema: HA3 7
Antworten: 96
Zugriffe: 10155

also mein weg bisher.. Die (insert-every-where) funktion wiederholt sich übrigens mit unterlisten quasi (insert-everwhere 'x ( (1 2 3 ) ( 3 4 5)) ) fügt also X überall in beide unterlisten ein. Das hat bei mir ein Problem gelöst das ich zum verfolgen des 1. Ansatz von perm gebraucht hab. Nun bei Per...

Zur erweiterten Suche