library(ggplot2) african_economicdata <- read.csv("african_crises.csv") Z_ED <- subset(african_economicdata, country == "Zimbabwe") Z_ED2001 <- subset(Z_ED, year > 2000) Z_ED2001$log10_exchange <- log10(Z_ED2001$exch_usd) ggplot(Z_ED2001, aes(Z_ED2001$year,Z_ED2001$log10_exchange)) + geom_line() +geom_point() + xlab("Year") + ylab("Exchange Rate in USD") + theme_minimal()Here is what the result looks like
[index]          
Practice FOREX - FREE or REAL at: http://www.avatrade.com/?tag=75842 Forex Scams: https://www.youtube.com/watch?v=eTiXEEBIQnI PART 2: https://www.youtube.com... In this video Jay Wayne will show you The Easiest FOREX Trade Setup-2020 ..... Learn more here: https://bit.ly/2ShPRPx Here' why you'll never make money in Forex. It's all because of the Forex cycle of doom. Many aspiring traders who ar... Too often new traders come into the market without getting to know the most fundamental components of foreign exchange and how currencies work. So we decided... The ONLY Forex Trading Video You Will EVER Need THIS QUICK TEST WILL HELP YOU BECOME FINANCIALLY FREE Take it HERE: https://discover.tiersoffreedom.com To jo...