应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 仿真模拟 » MAPLE & MathCAD » 【求助】请问MATHEMATICA输出数据格式问题
51/1返回列表
查看: 2524  |  回复: 5
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

wiselee

至尊木虫 (职业作家)

[交流] 【求助】请问MATHEMATICA输出数据格式问题 已有3人参与

我把计算数据输出到文件中，格式语句为：

strm=OpenWrite["test.txt", FormatType -> OutputForm];
Write [strm, t, "            ", U[4.0, 0.0, t], "             ",  W[4.0, 0.0, t], "           ",
P[4.0, 0.0, t] ];
close(strm);

文件中输出结果为(部分):

0   8.   3.4  0.  0.  0.
0   8.   3.6  0.  0.  0.
0   8.   3.8  0.  0.  0.
0   8.   4.  0.  0.  0.

Pi
--   0.   0.  0.  0.  0.
6
Pi
--   0.   0.2  -0.0000265038880797  0.  0.
6
Pi
--   0.   0.4  -0.0000523649255938  0.  0.
6
Pi
--   0.   0.6  -0.0000769539822211  0.  0.
6
Pi
--   0.   0.8  -0.0000996694798617  0.  0.
6
Pi                                              -19
--   0.   4.  1.29804470356 x 10     0.  0.
6

解释：时间t取作0和 Pi/6。
为何输出数据t=Pi/6没有简化为数字，另上边数据中为何出现了
1.29804470356 x 10^（-19）这种格式。
我尝试利用 NumberForm[u,12]格式似乎也没有改观。请哪位指点，自己看帮助半天也看不懂，猜测是不是FormatType -> OutputForm有问题，或请提供标准小数的输出格式写法。
谢谢啦
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2011-01-12 14:45:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

shadowdodo

木虫 (小有名气)
★ ★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
xiegangmai(金币+2): 谢谢应助！ 2011-04-11 13:26:29
zzuwangshilei(金币+1): 支持 2011-04-11 14:05:34
首先定义一个函数f[x,y], 用命令
zhsh1 = Table[f[x, y], {x, -0.9, 0.9, 0.01}, {y, 0, 1, 0.01}];
Export["20110402.dat", zhsh1]
赞一下(3人) 回复此楼
良辰美景奈何天，赏心乐事谁家院～
4楼2011-04-11 10:05:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

shadowdodo

木虫 (小有名气)
★
小木虫(金币+0.5):给个红包，谢谢回帖交流
不知道也, 偶一般输出为dat文件用Origin绘图，  没遇见过这种情况
赞一下(1人) 回复此楼
良辰美景奈何天，赏心乐事谁家院～
2楼2011-04-10 13:44:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wiselee

至尊木虫 (职业作家)
引用回帖:
Originally posted by shadowdodo at 2011-04-10 13:44:05:
不知道也, 偶一般输出为dat文件用Origin绘图，  没遇见过这种情况

dat文件和txt文件没有区别吧，这位朋友能否把输出语句贴出来看看。
赞一下 回复此楼
3楼2011-04-10 21:25:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wiselee

至尊木虫 (职业作家)
引用回帖:
Originally posted by shadowdodo at 2011-04-11 10:05:52:
首先定义一个函数f[x,y], 用命令
zhsh1 = Table[f[x, y], {x, -0.9, 0.9, 0.01}, {y, 0, 1, 0.01}];
Export["20110402.dat", zhsh1]

谢谢，我试试看
回复此楼
5楼2011-04-12 21:24:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
信息提示
关闭
请填处理意见
关闭