It is to create 10 visualizations using R and data from 2013 General Social Survey. I am not sure what other information is required.

3/29/23, 2:04 PM Untitled5 - Jupyter Notebook
localhost:8890/notebooks/Untitled5.ipynb# 1/11
Analysys of My GSS data using Visualizaton
Library Import
In [1]:
Data set loading
In [2]:
Registered S3 methods overwritten by 'ggplot2':
method from
[.quosures rlang
c.quosures rlang
print.quosures rlang
Attaching package: 'dplyr'
The following objects are masked from 'package:stats':
filter, lag
The following objects are masked from 'package:base':
intersect, setdiff, setequal, union
library(ggplot2)
library(dplyr)
data<-read.csv("mygss.csv")
3/29/23, 2:04 PM Untitled5 - Jupyter Notebook
localhost:8890/notebooks/Untitled5.ipynb# 2/11
About attributes
1. Bar plot self rated health
In [3]:
ggplot(data,aes(x=SRH_115))+geom_bar()+ggtitle('Health of pepople beased on Self rated health' ) +
xlab('SRH scale from 1 to 9 \n
1. Excellent 2. Very Good 3. Good 4. Fair 5. Poor 7. Dont Know 8. Refusal 9. Not stated ')

3/29/23, 2:04 PM Untitled5 - Jupyter Notebook
localhost:8890/notebooks/Untitled5.ipynb# 3/11
2.Volunteer work for 12 month
In [4]: ggplot(data,aes(x=VCG_300))+geom_bar()+
ggtitle('In the 12 past months, did person do unpaid volunteer work for any organization?') +
xlab('VCG_scale\n 1. Yes \t2. No\t 7. Dont Know \t8. Refusal')
3/29/23, 2:04 PM Untitled5 -...