Z.B. (in Mathematica 4.0) :
In[1]:= (A =
{{a1, b1, c1, d1}, {a2, b2, c2, d2}, {a3, b3, c3, d3}};
B = Transpose[A];
Export["test.txt",
Prepend[B, {"Spalte1", "Spalte2", "Spalte3"}],
"Table"];)
In[2]:= !!test.txt
Spalte1 Spalte2 Spalte3
a1 a2 a3
b1 b2 b3
c1 c2 c3
d1 d2 d3
--
MfG,
Rolf Mertig
--
Mertig Research & Consulting
http://www.mertig.com
Hippolyte Tekam wrote:
>
> liebe Mathematematica Anwender !
> Ich moechte eine Liste von entstandene Ergebnis von Mathematica in TableForm
> als asc oder Text-Datei Speichern.
>
> ein Beispiel:
>
> A = { {a1,b1,c1,d1}, {a2,b2,c2,d2}, {a3,b3,c3,d3}};
> B= Transpose[A];
> Print[" Spalte1 ,Spalte2,Spalte3"];
> Print[TableForm[B]];
>
> Das Ergebnis sieht so aus :
>
> Spalte1, Spalt2, Spalte3
> a1 a2 a3
> b1 b2 b3
> c1 c2 c3
>
> Jetzt Die Frage :
> Wie kann ich mathematica hinweisen mir dieses Ergebnis in form von Tabelle
> also TableForm ) als Text oder asc-datei zu speichern so das, wenn ich die
> Datei offne es genauso aussieht :
>
> Spalte1, Spalt2, Spalte3
> a1 a2 a3
> b1 b2 b3
> c1 c2 c3
>
> Mit " >>" bekomme ich das Ergebnis mit " {........}" und ich moechte das
> Ergebniss nicht mit "nb" speicher.
> Auch mit Save[........], klappt es nicht.
>
> Ps : diese Ergebnis wird waehrend der ablauf des Programm gespeichert.
>
> Ich bin sehr dankbar auf jeden Vorschlaegen
>
> Mit freundlichen Gruessen.
>
> Hippo
|