Wolfram mathematica 消除嵌套列表中每个列表的元素

我想消除嵌套列表中每个列表的第三个元素

例如：

    lst = { {1, 0, 0}, {1, 1, 1}, {1, 1, 4} }

因此，它将成为

    { {1, 0}, {1, 1}, {1, 1} }

---

我该怎么做呢？

有很多方法可以做到这一点，例如

lst = {{1, 0, 0}, {1, 1, 1}, {1, 1, 4}};

lst = lst[[All, {1, 2}]]

{1,0}，{1,1}，{1,1}

或

或者，没有转置

lst = MapThread[Delete, {lst, Table[3, {Length[lst]}]}]

---

有很多方法可以做到这一点，例如

lst = {{1, 0, 0}, {1, 1, 1}, {1, 1, 4}};

lst = lst[[All, {1, 2}]]

{1,0}，{1,1}，{1,1}

或

或者，没有转置

lst = MapThread[Delete, {lst, Table[3, {Length[lst]}]}]

还有一个：

lst = #[[1;;2]] & /@ lst

或者，如果只想从可能较长的子列表中删除第三个元素：

lst = Drop[#,{3}]& /@ lst

还有一个：

lst = #[[1;;2]] & /@ lst

或者，如果只想从可能较长的子列表中删除第三个元素：

lst = Drop[#,{3}]& /@ lst

---

您可以编写一个循环并创建一个新的嵌套列表，其中只包含您要查找的值。对不起，我是Mathematica的新手。这正是我想要了解的。我确信，自从我在回答您之前的问题时使用了

案例的文档后，您现在已经阅读了
案例的文档。返回该文档，您将了解如何使用相同的函数替换匹配的模式。还有其他方法可以达到同样的效果，特别是学习
->
（别名
规则
）的文档，但不要试图通过每次问一个小问题来学习数学；该程序有很好的文档记录，Wolfram提供了大量的教程。Google-sphere也是如此。哦，当我在这里的时候，请忽略@venomiangs的建议。在任何情况下都不能通过编写循环来解决这个问题；没有一个数学家会建议或这样做。@High Performance Mark，你知道如何让ListPlot函数忽略第三个组件，而不必像我在这里建议的那样操作列表吗？我在任何地方都找不到这个信息。我对Mathematica这种处理数据的方法有点困惑，因为我是一个Matlab用户。在那里，我可以简单地使用Plot（lst（：，1:2））之类的东西，您可以编写一个循环，并创建一个新的嵌套列表，其中只包含您要查找的值。这正是我想要了解的。我确信，自从我在回答您之前的问题时使用了
案例的文档后，您现在已经阅读了
案例的文档。返回该文档，您将了解如何使用相同的函数替换匹配的模式。还有其他方法可以达到同样的效果，特别是学习
->
（别名
规则
）的文档，但不要试图通过每次问一个小问题来学习数学；该程序有很好的文档记录，Wolfram提供了大量的教程。Google-sphere也是如此。哦，当我在这里的时候，请忽略@venomiangs的建议。在任何情况下都不能通过编写循环来解决这个问题；没有一个数学家会建议或这样做。@High Performance Mark，你知道如何让ListPlot函数忽略第三个组件，而不必像我在这里建议的那样操作列表吗？我在任何地方都找不到这个信息。我对Mathematica这种处理数据的方法有点困惑，因为我是一个Matlab用户。在那里，我可以简单地使用Plot（lst（：，1:2））之类的东西，为什么你说“Drop”代表更长的列表？如果你的生存点有4个元素，Drop会给你{#1，#2，#4}，这就是问题中的字面意思。第一个sol在#2之后删除所有内容。你为什么说“Drop”是指更长的列表？如果你的生存点有4个元素，Drop会给你{#1、#2、#4}，这就是问题中的字面意思。第一个sol在#2之后删除所有内容。