Dropping some row from a Table with If condition

DeleteCases[tab, _?(#[[1]] < 2 || #[[1]] > 8 &)]

Select the wanted:

f1 = Function[i, {i, i^2}]
tab = Table[f1[i], {i, 1, 10}]
keep = Function[i, 9 > i > 1] (* the selection predicate *)
Select[tab, keep@*First]

Or, don't create the unwanted:

f2 = Function[i, If[keep[i], {i, i^2}, Nothing]]
Table[f2[i], {i, 10}]

You could also use Except with Cases...

Cases[tab,Except[{a_,b_}/;a>8||a<2]]

{{2,4},{3,9},{4,16},{5,25},{6,36},{7,49},{8,64}}

Related