Hello everyone, this is Xiomara Vilchez and this is my first attempt at using and publishing through Rstudio and Rpubs. This is a continuation of what we were working on in class using data sets Zelig and DescTools

-Included will be a histogram displaying respondents by age. As we can see the majority of respondents were between the ages of 20-40 years

hist(turnout$age)

-Also included will be a histogram diplaying respondents by income

hist(turnout$income)

-Finally will be a simple linear plot displaying respondent income by age

plot(turnout$age, turnout$income)
abline(lm(income ~ age, data = turnout))

Thank you for viewing my first attempt at creating a functional spreadsheet, thorugh practice I hope to be able to learn more about Rstudio in the future