Question

我做错了什么，我应该怎么做才能解决第三行的错误？

我想尝试浏览expsList中的每个内部列表使用DeleteDuplicates并使用表格形式删除任何重复项表[expr，{i，{i1，i2 .....}}]使用连续值i1，i2，......

我尝试删除每个列表中的重复项，然后尝试将输出保存到名为theDeleted的变量中。如果我键入theDeleted = DeletedDuplicates [expList [[1]]]，我的代码似乎有效，但是当我使用Table命令时则不行。那么错误的原因是什么？我将如何解决它（起诉上面列出的细节）。

 n = 3;
  expList = Table[RandomInteger[{1, 365}, 20], {n}];
  theDeleted = DeleteDuplicates[expList[[Table[x, {x, {1, 2, 3}}]]]];

Answer 1

尝试

theDeleted = Table[DeleteDuplicates[ expList[[x]] ], {x, {1, 2, 3 }} ];

您的代码会创建一些查看Part Documentation类型为

的内容

EXPR [[{I1，I2，...}]]     给出了expr的部分i1，i2，...的列表。

这又是原始列表。

最终你想要像

这样的东西

Map[ DeleteDuplicates, expList ]

如何删除列表列表中的重复项？

1 个答案: