How to create a simple bar chart with ggplot2 in R

ggplot_bar.R

library(dplyr)
library(Lahman)
library(ggplot2)

# Get all the teams from 1980 and how many home runs they hit
df<-Teams %>%
  filter(yearID==1980) %>%
  select(name, HR) %>%
  arrange(HR)

# Bar chat plot with the team name on the x-axis and number of HR on the y-axis
# We already summarized the HR totals in our above query, so stat="identity" is required
ggplot()+
  geom_bar(data=df, aes(x=name,y=HR),stat="identity", color="green", fill="white")+
  ggtitle("HR by team in 1980")
  
# Bar chat plot with the coordinates flipped, so team names are easier to read
ggplot()+
  geom_bar(data=df, aes(x=name,y=HR),stat="identity", color="green", fill="white")+
  ggtitle("HR by team in 1980")+
  coord_flip()