| Author |
Comment/Response |
Bill Simpson
|
 03/01/12 1:39pm
In[1]:= DeleteCases[Flatten[{{{1,-300.30,200.30},{1,5.40,6.89},{1,0.34,0.95}},{{2,10.32,9.44},{2,40.56,50,38},{2,0.48,0.32}}},1],{_,y_,z_}/;Not[0<y<1&&0<z<1]]
Out[1]= {{1,0.34,0.95},{2,40.56,50,38},{2,0.48,0.32}}
URL: , |
|
