Wolfram mathematica 如何从大量列的较大列表中创建较少列的Mathematica列表

我有一个“数据1”列表：

{1,6,4.5,1141.793,2.31634,27.907}，{2,7,4.5,1133.702，
2.28725, 26.7442}, {3, 5, 5, 1, 136.546, 2.33522, 25.5814}, {4, 8, 
5,1104.694,2.27871,24.4186}

我想做的是创建一个新表，其中只包含每个元素的前两列。因此，我的新表将是：

{{1,6},{2,7},{3,5},{4,8}}

我试过了

data1[[All，1][All，2]]

---

和其他变体，但我不知道如何捕获所需的字段。谢谢您的帮助。

只需将您想要的索引范围或列表作为第二个参数，如下所示：

In[71]:= data[[All, {1, 2}]]
Out[71]= {{1, 6}, {2, 7}, {3, 5}, {4, 8}}

---

完美的我应该在两小时前问你。