Assignment: Use the provided dataset to produce visualizatio

Assignment: Use the provided dataset to produce visualizations and then tell the story of your visualizations. The dataset and dataset documentation will be found in this week’s folder. I will also create a video that will provide more details for the assignment.Graphs to Produce:ggplot2 – Bar Plot: (Use dataset_budget_share_Food_Spanish_Households.csv)ggplot(dataset_name, aes(x=categorical, fill=categorical)) + facet_wrap(~categorical) + theme_bw() + geom_bar(position=’dodge’)Label the x-axis.Label the y-axis.Give the graph a title.What story is presented in this visualization?ggplot2 – Histogram: (Use dataset_budget_share_Food_Spanish_Households.csv)ggplot(dataset_name, aes(x=continuous, fill=categorical)) + theme_bw() + facet_wrap(~categorical) + geom_histogram(binwidth=5) — you can decide the binwidthLabel the x-axis.Label the y-axis.Give the graph a title.What story is presented in this visualization?ggplot2 – Box Plot: (Use dataset_budget_share_Food_Spanish_Households.csv)ggplot(dataset_name, aes(x=categorical, y=continuous, fill=categorical)) + theme_bw() + facet_wrap(~categorical) + geom_boxplot()Label the x-axis.Label the y-axis.Give the graph a title.What story is presented in this visualization?ggplot2 – Scatter Plot: (Use dataset_budget_share_Food_Spanish_Households.csv)ggplot(dataset_name, aes(x=continuous, y=continuous, shape=categorical, col=categorical)) + facet_wrap(~categorical) + theme_bw() + geom_point() + geom_smooth(method=’lm’,se=F)Label the x-axis.Label the y-axis.Give the graph a title.What story is presented in this visualization?Please put all screen shots in a MS Word (other word processors are fine to use but save it in MS Word format). Don’t upload the screen shots individually in the assignment folder! Submit your assignment on or before the due date.