First, we need to upload our data set into R

vdemfull<-readRDS("C:/Users/jedia/Desktop/RWD/V-Dem-CY-Full+Others-v11.1.rds")
## Warning in readRDS("C:/Users/jedia/Desktop/RWD/V-Dem-CY-Full+Others-v11.1.rds"):
## strings not representable in native encoding will be translated to UTF-8

Next, we’re going to label our variables for our own convenience

FemaleSuffrage<-vdemfull$v2fsuffrage
MaleSuffrage<-vdemfull$v2msuffrage
PoliticalParticipation<-vdemfull$v2x_genpp

Then, quick summaries of our variables to get an idea of the descriptive statistics

summary(FemaleSuffrage)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    0.00    0.00  100.00   52.06  100.00  100.00    8366
summary(MaleSuffrage)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##    0.00    0.00  100.00   61.47  100.00  100.00    8366
summary(PoliticalParticipation)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max.    NA's 
##   0.047   0.115   0.290   0.395   0.641   1.000    4626

We need to take note of the mean of Female Suffrage and Male Suffrage, as these will be used in our article

We now have to make the plots that we will be using in our article.

There are some basic transformations we’ll be doing to make them look cleaner

To change the color, we will use col=""

To change the title, we will use main=""

To change the x axis, we will use xlab=""

The y axis label of frequency already works for what we want, so no change is needed.

We will be using the hist() command, as for our data it is the clearest looking plot

hist(FemaleSuffrage, col="Red", main="Female Suffrage", xlab="% of Women with Suffrage")

hist(MaleSuffrage, col="Blue", main="Male Suffrage", xlab="% of Men with Suffrage")

hist(PoliticalParticipation, col="Dark Green", main="Women Political Participation", xlab="Descriptive Representation of Women")

All we have left to do is export our graphs as images and upload them to our article.