24小时热门版块排行榜    

查看: 560  |  回复: 3
当前主题已经存档。
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

sxy5306

铁杆木虫 (著名写手)

[交流] 【求助】matehmatica 数据输出问题

再mathematica里面输出了图形,想用图形的原始数据导出,再origin里面重新画图,但是不知道如何导出,请高人指点,谢谢!
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

quantumfang

至尊木虫 (著名写手)

小木虫中医研究院院长

★ ★ ★
ddx-k(金币+3,VIP+0):很好,谢谢。 5-12 22:18
data = {{x, rhoup, rhodn, rhoup + rhodn}};
OutputForm[TableForm[data, TableSpacing -> {0}]] >>> dos.txt;,

这是最标准的输出方式。存在的潜在问题就是,象1.6*10^-19这种结果,会输出成几行:
         -19
1.6  10

这一点需要注意,我使用多年一直找不到好的解决办法。

相比较而言,你看一下比较笨的办法是怎么办的:
dos = OpenAppend["dos.txt"];
Write[dos, x, "", rhoup, "", rhodown];

这种做法输出文件内包含双引号“”,你要批量删除掉它
3楼2009-05-12 01:14:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

ddx-k

荣誉版主 (著名写手)

骑士II

★ ★
musi429(金币+2,VIP+0):多谢交流~ 5-13 05:06
我想如果导出的是txt文档的话可以不删除它,直接用oringin导入数据,引号们自己占据了一列,不影响你作图。不知道可行不?
4楼2009-05-12 22:19:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
信息提示
请填处理意见