powered by
dropunusedlevels(x)
iris[1:10,]$Species dropunusedlevels(iris[1:10,])$Species
Run the code above in your browser using DataLab