从mathematica中的离散函数创建列表

时间:2016-10-10 11:56:55

标签: list wolfram-mathematica

我正在尝试制作列表{{a},{b} ...},但我正在建立一个非列表字词列表{{{a}},{{b} } ...}

首先,我开始使用离散函数:

 f[n_]:=RandomReal[BinormalDistribution[{c[[n, 3]], c[[n, 1]]}, ........... 

其次,我通过以下方式列出了一份清单:

 d = Array[f, 100]

输出:{{{1.64219, 0.0231185}}, {{0.690885, 0.00599381}},......

SmoothDensityHistogram无法阅读:

  

SmoothDensityHistogram :: ldata:{{1.64219,0.0231185}}不是有效的数据集或数据集列表。

1 个答案:

答案 0 :(得分:1)

您可以在列表列表中Flatten一个级别。实际上,你正在挤出3d数组中的单个维度,使其成为2d:

In[22]:= mylist = {{{1.64219, 0.0231185}}, {{0.690885, 0.00599381}}}

Out[22]= {{{1.64219, 0.0231185}}, {{0.690885, 0.00599381}}}

In[23]:= Dimensions[mylist]

Out[23]= {2, 1, 2}

In[24]:= mymatrix = Flatten[mylist, 1]

Out[24]= {{1.64219, 0.0231185}, {0.690885, 0.00599381}}

In[25]:= Dimensions[mymatrix]

Out[25]= {2, 2}