I am trying to label the stack bar chart with percentage and I ended labeling with proportion. Here are my codes:

```
ggplot(data = GradeSTEM_data, aes(x = Grade, y = percent, fill = STEMFlag, label = sprintf("%.02f", percent))) +
  geom_bar(position = "fill", stat = "identity") +
  scale_y_continuous(labels = scales::label_percent(accuracy = 1)) + 
  geom_text(position = position_stack(vjust = 0.5), size = 2)

```

![graph](https://i.stack.imgur.com/ccSPm.png)