如何以列表格式输入到txt文件

desert007

1. {a1, a2, a3} >>> "a.txt";
   
2. {b1, b2, b3} >>> "a.txt";

复制代码

如上代码输出的结果是这样的：
{a1, a2, a3}
{b1, b2, b3}

请问如何得列表格式呢，如：
a1      a2        a3
b1      b2        b3

请高手帮忙，谢谢了！

PS：还有个问题，数字输入到txt文件时，如何控制让它只输出科学计数法小数点后6位的数呀？ 这样的话可以方便让其他程序调用。

desert007

自问自答

1. Export["a.txt", {{a1, a2, a3}, {b1, b2, b3}}, "Table"]

复制代码

不过PS问题还不知道。还有Export， 有没有类似Append的功能啊？ps:  当a1,a2,a3数字很长但b1 为整数的时候， 得到的文件的列是不对齐的，这个时候又应该怎么办呢？

guocong89

desert007 发表于 2012-10-11 22:37
自问自答不过PS问题还不知道。还有Export， 有没有类似Append的功能啊？ps:  当a1,a2,a3数字很长但b1 为整 ...

Alignment 选项

1. Export["C:\\a.txt", {{2.133333, 2.111, 4}, {0.2255, -2551,
   
2.    365.23164}}, "table", Alignment -> Right]

复制代码

desert007

guocong89 发表于 2012-10-12 10:26
Alignment 选项

十分有用，谢谢。 这个Export里的Option都有哪些啊？我在帮助文档里只看到，有Option这格式，但找不到有哪些Option可以设置。求教！

nancy02628

Export["a.txt", {{a1, a2, a3}, {b1, b2, b3}}, "Table"]//TableForm
可以显示列表状态

desert007

nancy02628 发表于 2012-10-21 21:24
Export["a.txt", {{a1, a2, a3}, {b1, b2, b3}}, "Table"]//TableForm
可以显示列表状态

谢谢。 知道“Table"后面有哪些选项可以指定不？

nancy02628

list1 = {0.1, 20, 300, 0.5};
list2 = {0.01, 2, 300, 0.5};
OutputTable = Table[
   (
    {ToString@
      NumberForm[list1[[i]], {8, 2}, NumberPadding -> {" ", "0"}],
     ToString@
      NumberForm[list2[[i]], {6, 2}, NumberPadding -> {" ", "0"}]
     }
    ), {i, Length[list1]}];
Export["test.txt", OutputTable, "Table"];