# NOT RUN {
# Create a ddf using the iris data
bySpecies <- divide(iris, by = "Species")
# Filter using only the 'value' of the key/value pair
drFilter(bySpecies, function(v) mean(v$Sepal.Width) < 3)
# Filter using both the key and value
drFilter(bySpecies, function(k,v) k != "Species=virginica" & mean(v$Sepal.Width) < 3)
# }
Run the code above in your browser using DataLab