tapply(iris$Sepal.Width, iris$Species, mean)

##     setosa versicolor  virginica 
##      3.428      2.770      2.974