24小时热门版块排行榜    

CyRhmU.jpeg
查看: 2687  |  回复: 7
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

906527107

金虫 (小有名气)

[求助] Mathematica怎样才能输出不带括号的数据

找高手求助:怎样用Mathematica输出txt文件中不带括号?
    我现在输出的txt格式的文件结果是:{1,290}
                                                                {2,288}
                                     {3,270}
                                                                 {4, 266}
                                                                   .......
    而我希望输出的结果是:1  290
                                           2  288
                                           3  270
                                           4  266
                                             .......
  哪位高手能指点下,不胜感激!
回复此楼
欲速则不达!!!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

906527107

金虫 (小有名气)

引用回帖:
4楼: Originally posted by virtualzx at 2013-11-26 12:02:00
hmm, 奇怪。那试试这个
Export[file, Column@Table, "String"];...

这次输出结果没有了空格,但是我想控制下结果的精度,比如291.00000在输出的文件中显示为291. 这样的话在fortran里面就不是很好读了。现在的结果是这样的:
1 291.
2 291.
3 291.
4 291.
5 291.
6 291.
7 291.
8 291.
9 291.
10 291.
11 291.
12 291.
13 291.
14 291.
15 290.999
16 290.104
17 246.862
18 291.
19 291.
20 291.
欲速则不达!!!
5楼2013-11-26 12:54:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 8 个回答

virtualzx

木虫 (著名写手)

【答案】应助回帖

★ ★
感谢参与,应助指数 +1
906527107: 金币+2, 有帮助, 问题大部分得到解决 2013-11-26 10:04:49
Export[file, TableForm[data], "String"];
2楼2013-11-26 01:32:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

906527107

金虫 (小有名气)

引用回帖:
2楼: Originally posted by virtualzx at 2013-11-26 01:32:06
Export;

谢谢您的建议,已得到预期的效果。
但是有个问题是,为什么在输出的结果中,数据与数据间都空了一行,怎么消除?
1     291.

2     291.

3     291.

4     291.

5     291.

6     291.

7     291.

8     291.

9     291.

10    291.
欲速则不达!!!
3楼2013-11-26 10:04:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

virtualzx

木虫 (著名写手)

【答案】应助回帖

★ ★
906527107: 金币+2, ★★★很有帮助 2013-11-26 12:55:14
引用回帖:
3楼: Originally posted by 906527107 at 2013-11-25 21:04:04
谢谢您的建议,已得到预期的效果。
但是有个问题是,为什么在输出的结果中,数据与数据间都空了一行,怎么消除?
1     291.

2     291.

3     291.

4     291.

5     291.

6     291.

7      ...

hmm, 奇怪。那试试这个
Export[file, Column@Table[Row[line, " "], {line, data}], "String"];
4楼2013-11-26 12:02:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
信息提示
请填处理意见