Mathematica - 导入 CSV 并处理列？

Question

我有一个 CSV 文件，其格式如下：

0.0023709,8.5752e-007,4.847e-008

我想将其导入 Mathematica，然后将每一列分成一个列表，以便我可以对所选列进行一些数学运算。

我知道我可以使用以下方式导入数据：

Import["data.csv"]

然后我可以用以下方式分隔列：

StringSplit[data[[1, 1]], ","]

这给出了：

{"0.0023709", "8.5752e-007", "4.847e-008"}

现在的问题是我不知道如何将数据放入单独的列表中，而且 Mathematica 不接受以下形式的科学记数法8.5e-007。

任何有关如何将数据分成列和格式化科学记数法的帮助都会很棒。

提前致谢。

Answer 1

肯尼TM是正确的。

data = Import["data.csv", "CSV"];
column1 = data[[All,1]]
column2 = data[[All,2]]
...

Answer 2

如果您需要导入整个 CSV 文件作为数组。但是，如果您需要从 C/Fortran 样式指数表示法转换单个字符串，则可以使用 ImportString 以及不同的格式参数。例如，

In[1]:= ImportString["1.0e6", "List"]
Out[1]= {1.*^6}

*^ 运算符相当于 Mathematica 中的 e。请注意，这也是拆分 CSV 形式的字符串的好方法：

In[2]:= ImportString["1.0e6,3.2,foo", "CSV"] 
Out[2]= {{1.*10^6,3.2,foo}}

在这两种情况下，您都会将答案包含在额外级别的列表结构中，这非常容易处理。但是，如果您确实确定只有或想要一个数字，则可以将字符串转换为流并使用Read。然而，它太麻烦了，我会坚持使用 ImportString：

In[3]:= Module[{stream = StringToStream["1.0e6"], number},
          number = Read[stream, "Number"];
          Close[stream];
          number]
Out[3]= 1.*10^6

Answer 3

您可以使用 StringReplace[]。

In[1]: aa = {"0.0023709", "8.5752e-007", "4.847e-008"};

In[2]: ToExpression[
          StringReplace[
             #,
             RegularExpression@"(^\d+\.\d+)e([+-]\d+)" -> "$1*10^$2"
          ]
       ] & @ aa

Out[2]: {0.0023709, 8.5752*10^-7, 4.847*10^-8}

您可以将整个数据数组放在 aa 的位置，以便使用带有 ToExpression[...] 的单行程序一次处理所有内容，

{col1,col2,col3} = ToExpression[...] & @ Transpose[Import["data.csv", "CSV"]];

如上所述。

Answer 4

在 MMA7 中，我使用“元素”参数。事实上，如果不指定元素，我什至无法导入 .csv 文件：

aa=Import["data.csv","Data"]

执行此操作时，所有字符串都会自动转换为表达式： Head/@Flatten@ aa 是{实数，实数，....}。另外，“8.5752e-007”变成8.5752*10^7，一个合法的MMA表达式。

导入的结果是一个 1xn 列表 {{ ... }}。

因此，Transpose@aa 给出 nx1 列表 {{.},{.}, .... }。

我想这就是你想要的格式。