Question #1: question copy and paste mpg dataset?

ggplot(mpg) +
  geom_bar(aes(x=fl, color = fl, fill = fl))

Answer: Based on the plot, it appears that

Question #2: