Verzeichnisse durchlaufen < Maple < Mathe-Software < Mathe < Vorhilfe
|
Status: |
(Frage) reagiert/warte auf Reaktion | Datum: | 14:45 Di 11.10.2011 | Autor: | AT-Colt |
Hallo Leute,
das hier ist eher eine Programmier-Frage als eine Mathe-Frage, vielleicht koennt ihr mir aber trotzdem helfen. Ich weiss - mangels Programmiererfahrung - nichtmal, wonach ich googlen muesste.
Ich habe ein Programm, mit dem ich fuer verschiedene Parameter dieselbe Rechnung durchlaufe.
Ordentlich wie ich bin, speichere ich die Ergebnisse alle in verschiedenen Ordnern ab. Das sieht dann z.B. so aus:
1: | C:\Dokumente\Rechnung1\Ergebnis.txt
| 2: | C:\Dokumente\Rechnung2\Ergebnis.txt
| 3: | C:\Dokumente\Rechnung3\Ergebnis.txt |
Nun moechte ich diese Dateien mit Maple auslesen, also
1: | data:=readdata("C:\Dokumente\Rechnung1\Ergebnis.txt",[float,float]):
| 2: | xvariable[1]:=[seq(data[i,1],i=1..nops(data))]:
| 3: | yvariable[1]:=[seq(data[i,2],i=1..nops(data))]:
| 4: |
| 5: | data:=readdata("C:\Dokumente\Rechnung2\Ergebnis.txt",[float,float]):
| 6: | xvariable[2]:=[seq(data[i,1],i=1..nops(data))]:
| 7: | yvariable[2]:=[seq(data[i,2],i=1..nops(data))]:
| 8: |
| 9: | data:=readdata("C:\Dokumente\Rechnung3\Ergebnis.txt",[float,float]):
| 10: | xvariable[3]:=[seq(data[i,1],i=1..nops(data))]:
| 11: | yvariable[3]:=[seq(data[i,2],i=1..nops(data))]: |
So geht das noch, aber sollte ich mehr als 3 Rechnungen haben, wird das ganze Prozedere zum einen extrem unuebersichtlich, zum anderen muss ich viel aendern, wenn ich einen Fehler gefunden haben sollte.
Nun zu meiner Frage:
Wie kann ich die Verzeichnisnamen automatisch durchlaufen?
Ich suche etwas, das qualitativ folgendes bewirken wuerde:
1: | for j from 1 to 3 do
| 2: | data:=readdata("C:\Dokumente\Rechnung%j\Ergebnis.txt",[float,float]):
| 3: | xvariable[j]:=[seq(data[i,1],i=1..nops(data))]:
| 4: | yvariable[j]:=[seq(data[i,2],i=1..nops(data))]:
| 5: | end do: |
Vielleicht kann mir ja jemand helfen. Danke schonmal im Voraus.
Viele Gruesse,
AT-Colt
/e
Hoffentlich alles etwas lesbarer gemacht.
|
|
|
|
Status: |
(Mitteilung) Reaktion unnötig | Datum: | 16:45 Do 13.10.2011 | Autor: | AT-Colt |
Hola,
das Problem ist geloest. Mit dem cat-Befehl kann man Zeichenketten zusammenfuegen. Die Loesung lautet also:
1: | a:=[1,2,3]
| 2: | c:=0:
| 3: | for i in a do
| 4: | c:=c+1:
| 5: | data:=readdata(cat("C:\Dokumente\Rechnung",a[c],"\Ergebnis.txt"),[float,float]):
| 6: | xvariable[c]:=[seq(data[i,1],i=1..nops(data))]:
| 7: | yvariable[c]:=[seq(data[i,2],i=1..nops(data))]:
| 8: | end do:
|
Vielleicht hilft das ja noch jemand anderem.
Viele Gruesse,
AT-Colt
|
|
|
|