Question

让我说,你有一份名单,你只希望删除这些名单,其篇幅为零,例如:

a={{...},{...},{...},...}
DeleteCases[a, ?]

The What should the ??

Answer 1

可以:

a = {{1, 2, 3}, {4, 5}, {}, {5}}
b = DeleteCases[a, x_ /; Length[x] == 0]


{{1, 2, 3}, {4, 5}, {5}}

Answer 2

In[1]:= a={{1,2,3},{4,{5,5.5},{}},{},6,f,f[7],{8}}
Out[1]= {{1,2,3},{4,{5,5.5},{}},{},6,f,f[7],{8}}

纳赛尔提出的解决办法:

In[2]:= DeleteCases[a, x_/;Length[x]==0]
Out[2]= {{1,2,3},{4,{5,5.5},{}},f[7],{8}}

注 1. 如果你只想从第一级删除零(即{>>>>)的长度清单,那么你可以使用。

In[3]:= DeleteCases[a, {}]
Out[3]= {{1,2,3},{4,{5,5.5},{}},6,f,f[7],{8}}

或如果您希望从所有各级删除,则使用<代码>ReplaceAll(/.)。

In[4]:= a /. {} -> Sequence[]
Out[4]= {{1,2,3},{4,{5,5.5}},6,f,f[7],{8}}