Problem 6 Barplot

library(RColorBrewer)
ggplot(mpg,aes(manufacturer, fill=class))+
  geom_bar(width=0.5)+
  theme_minimal()+
  theme(axis.text.x = element_text(angle=65))+
  scale_fill_brewer(palette="Spectral")+
  labs(title="Barplot", subtitle = "Manufacturer across vehicle Classes",caption="Source:mpg")