Following the directions on the Coursera assignment page, you will make four original visualizations. Note that the data for the CCES and CEL data are imported in code in the R Markdown file.

Put your name here: Baohua Wu

Exercise 1

Explain what you are visualizing here:
How many bills introduced became law over bills introduced in congress?

Put your figure here:

Exercise 2

Explain what you are visualizing here: Histogram for bills introduced became law

Put your figure here:

Exercise 3

Explain what you are visualizing here: Barchart for Counts by Gender

Put your figure here:

## 
## Female   Male 
##   1052   8793

Exercise 4

Explain what you are visualizing here:

Bill Became Law by Year and Gender

Put your figure here:

####PUT YOUR CODE HERE

df<-cel%>%group_by(year, gender)%>%summarise(tot_law = sum(all_law))
## `summarise()` regrouping output by 'year' (override with `.groups` argument)
ggplot(data=df, aes(x=year, y=tot_law, color = gender))+
  geom_line()+
  labs(title="Bills Became Law by year", x="Year", y="Total Bills Became Law")+
  annotate("text", x = 1990, y = 150, label = "n(Female) < n(Male)", color = "red", size = 3, fontface = "bold") + 
  facet_wrap(~gender)+
  theme_bw()