导出Mathematica打印[]输出到.txt文件

2018-05-31 02:38:15

我有一个大型的Mathematica笔记本，它使用Print[]命令定期输出运行时间消息。这是笔记本生成的唯一输出（除了导出的文件）。有什么办法可以自动将输出导出到.txt文件，而无需重新编写Print[]命令？

根据文档， Print输出到$Output通道，这是一个流列表。所以，在笔记本的开始，

strm = OpenWrite["output.log"];
AppendTo[ $Output, strm ];

并在笔记本的末尾

Close[strm];

请注意，如果在关闭流之前执行中断，那么您必须手动执行。此外，上述代码将覆盖“output.log”中的先前数据，因此您可能希望使用OpenAppend 。

编辑：为了保证Abort将被调用，请考虑使用此处概述的技术之一。

你想要PutAppend命令。

链接地址: http://www.djcxy.com/p/6051.html