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]          
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... 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... 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... This a video explaining what forex is and how I got started in the 5.7 trillion dollar market I hope everyone enjoys. if you're interested hit my dm on insta... http://www.forextrendy.com/?hop=stevo1789 Click the link above to join the best trading system in Europe and America. Like The Forex Trendy Facebook page: ht...