Regarding adding bar labels at the top of each bar in ggplot() in Rstudio

There is a similar question on this site, where I answered giving an example of how to do this. Here is my answer: