you actually don't need to use the piping operator at all. The table function allows for logical indexing.
table(iris$Species == 'setosa' & iris$Sepal.Length >= 5.7)