Write float arrays to a text file: Difference between revisions

(→‎{{header|Mathematica}}: adding new lines)
Line 849:
 
=={{header|Mathematica}}==
<lang Mathematica>exportPrec[path_, data1_, data2_, prec1_, prec2_] :=Export[path,Transpose[{Map[ToString[NumberForm[#, prec2]] &, data2],Map[ToString[NumberForm[#, prec1]] &, data1]}], "Table"]</lang>
Export[
path,
Transpose[{Map[ToString[NumberForm[#, prec2]] &, data2], Map[ToString[NumberForm[#, prec1]] &, data1]}],
"Table"
]</lang>
 
=={{header|MATLAB}} / {{header|Octave}}==
1,935

edits