library(plyr)
library(plotly)
#reading in data
df<-read.csv('C:/Users/vivek/Documents/08032017_GDPDAta.csv')
# light grey boundaries for countries
l <- list(color = toRGB("black"), width = 0.5)
## Warning: Ignoring 3 observations
## Warning in arrange_impl(.data, dots): '.Random.seed' is not an integer
## vector but of type 'NULL', so ignored
Conclusion: United States will likely be the leader in GDP in terms of Purchasing Power Parity, however one should watch out for China as it is not very far behind the United States.