smithaam

library('dplyr')
library('ggplot2')
library("reshape2", lib.loc="~/R/win-library/3.3")

pdf("Gender Parity Index Analysis Report.pdf",onefile=T, paper="USr" )
gpi=read.csv(file='C:/Users/Smitha/Desktop/RProject/GPI_DATA.csv',header=TRUE,sep=",",quote="\"", stringsAsFactors = FALSE, fill=FALSE, check.names = FALSE)
country=read.csv(file='C:/Users/Smitha/Desktop/RProject/COUNTRY_DATA.csv',header=TRUE,sep=",",quote="\"", fill=FALSE,stringsAsFactors = FALSE)
gpijoined=left_join(country,gpi,by="CountryCode")
gpijoined.df=melt(gpijoined)
gpijoined.df = rename(gpijoined.df, Year=variable, GPI=value)