Diagramme à barres empilées dans la r -ggplot

r ggplot à barres empilées les étiquettes

ggplot(Data, aes(x = Year, y = Frequency, fill = Category, label = Frequency)) +
  geom_bar(stat = "identity") +
  geom_text(size = 3, position = position_stack(vjust = 0.5))