Several labels while using geom_text function

Question

I am using the following code and I want to have one label for each bar indicating the value of that bar instead of several labels as shown below. Can someone please help?

    ggplot(data = iris, aes(x = Species , y = Sepal.Length, fill = Species)) +
      geom_bar(stat = "summary",
               show.legend = T,
               fun = mean) +
      ylab("Sepal Length") + xlab("Types of Species") +
      ggtitle('Sepal Length vs Species') +
      scale_fill_manual("legend",
                        values = c(
                          "setosa" = "black",
                          "versicolor" = "orange",
                          "virginica" = "blue"
                        )) + geom_text(aes(label = Sepal.Length))

Answer 1

You can try this:

ggplot(data = iris, aes(x = Species , y = Sepal.Length, fill = Species)) +
  geom_bar(stat = "summary",
           show.legend = T,
           fun = mean) +
  ylab("Sepal Length") +
  xlab("Types of Species") +
  ggtitle('Sepal Length vs Species') +
  scale_fill_manual("legend",
                    values = c(
                      "setosa" = "black",
                      "versicolor" = "orange",
                      "virginica" = "blue"
                    )) +
  geom_text(aes(label = round(..y.., 2)), 
            stat = "summary",
            vjust = -.5)