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... In this video Jay Wayne will show you The Easiest FOREX Trade Setup-2020 ..... VIP EAP Mentorship Program - https://eaptrainingprogram.com/video-sales-page Time Stamps: What is a pip? - 10:40 What is the value of a pip? 27:00 What is le... Watch our video to find out the basic processes taking place on the foreign exchange market and how you can benefit from them. In addition, you will learn ho... 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...