Photo of Monticello in Albemarle County
roster <- read.csv("test data.csv")
knitr::kable(roster)
| X..Timestamp. | X.Are.you.aware.of.the.new.Affordable.Housing.Policy.and.the.crises.that.homeowners.are.facing.around.the.county.for.housing.. | X.What.other.issues.do.you.think.are.relevant.to.the.Albemarle.community.. | X.What.other.information.on.Affordable.Housing.would.you.like.to.be.included.on.the.website… | |
|---|---|---|---|---|
| [‘2/2/2020 15:55:27’ | True | ’’ | ’’ | ‘Option 1’] |
| [‘2/2/2020 15:56:20’ | True] | |||
| [‘2/2/2020 18:56:15’ | True | ‘a’ | ‘d’] | |
| [‘2/2/2020 19:07:27’ | True | ‘LGBT acceptance’] | ||
| [‘2/2/2020 19:08:27’ | False | ‘Climate issue prevention’] | ||
| [‘2/2/2020 19:10:33’ | False | ‘I do not live in Albermarle’] | ||
| [‘2/2/2020 19:11:03’ | False | ‘school crowding’ | ‘good info’] | |
| [‘2/2/2020 19:11:09’ | True | ‘mental health in the homeless and incarcerated communities’ | ‘How it affects the middle class?’] | |
| [‘2/2/2020 19:11:20’ | True | ‘Equality’ | ‘Any that would help me understand more about what I should be worried about as a teenager’] | |
| [‘2/2/2020 19:11:56’ | False | ‘Schools’ | ‘Houses for sale’] | |
| [‘2/2/2020 19:12:18’ | False | ’Health Care | Transportation | Education’] |
| [‘2/2/2020 19:13:53’ | True | ‘Housing discrimination’ | ‘How will it affect college students?’] | |
| [‘2/2/2020 19:14:33’ | True | ‘lack of student voice’ | ‘What causes the crisis and what we can do to help’] | |
| [‘2/2/2020 19:15:09’ | True | ‘Traffic during events in Charlottesville’] | ||
| [‘2/2/2020 19:15:37’ | False | ‘lack of student voice’] | ||
| [‘2/2/2020 19:18:56’ | False | ’I think overpopulation is definitely an issue | which is relevant not only in housing | but in relation to the school systems as well |
| as seen in the massive influx of students to schools.’ | ’I think it could include more information about average costs of houses in Albemarle County | as well as the average wages median wages in the county (not mean | as it could be thrown off by very low or very high data points).’] | |
| [‘2/2/2020 19:19:17’ | True | ‘Homelessness?’ | ‘What are we doing right now to help the crisis?’] | |
| [‘2/2/2020 19:20:36’ | False | ‘Education accessibility/ equal education’ | ‘Links to organiations/charities that help people to achieve affordable housing’] | |
| [‘2/2/2020 19:24:53’ | True | ‘School zoning and plans for new schools’ | ‘which areas are being considered for low income housing’] |
Are you aware of the new Affordable Housing Policy and the crises that homeowners are facing around the county for housing?
slices <- c(10, 8)
lbls <- c("Yes", "No")
pie(slices, labels = lbls, main="")