Question

Mathematica中 怎么向文件中输入空格

s = OpenWrite["as1.txt"];
For[i = 1, i <= 24, i++, {
Write[s, i ,*******,i + 1]}]
Close[s];
比如上面这个程序 我要i和i+1之间有空格
即输出结果是
1 2
2 3
3 4
***********这里应该怎么写
Ps：别告诉我是写“ " " ”哦
我试过了 没用 输出的是
1“ ”2
2“ ”3
一直有双引号

Answer 1

设置输出文件的格式FormatType->StandardForm就可以输出空格了。具体修改如下：

结果如下

Answer 2

s = OpenWrite["C://as1.txt", FormatType -> OutputForm];
For[i = 1, i <= 24, i++, {Write[s, i, " ", i + 1]}]
Ref: http://reference.wolfram.com/legacy/v5_2/book/section-2.12.3