导出mathematica画图时的计算数据的方法

导出mathematica画图时的计算数据的方法

2007-06-28 22:40:41| 分类：

Mathematica | 标签：
|字号大中小 订阅

方法1.

Data=Table[y,{w,0,1,0.01}] （*后面是计算的区域和步长，得到相应的数据点*）

Export["Out.txt", Data, "Table"] （*这个当然是输出的语句了，你可以看帮助得到你需要的格式*）

那么Out.txt就是你的结果文件了。可以用一些软件读取分析。

out.txt在Mathematica的安装目录里，也可以在文件的地方写全文件的绝对路径。

方法2：

str1 = OpenWrite["daaa.txt"];

For[i = 1, i ≤ 24, i++, {For[j = 1, j ≤ 19, j++, {WriteString[str1,

"\t"], WriteString[str1, prea[[i, j]]]}], WriteString[str1, "\n"]}]

/*prea is an arrray defined before

Close[str1]

try

方法3：

可用InputForm[a],其中a为图形，可直接显示图形的所有特征

摘自：http://514304446.blog.163.com/blog/static/259091372007528104041212/