> boxplot(count ~ spray)          # boxplot(count~spray, data=InsectSprays) if not attached