library(knitr)
opts_knit$set(root.dir="../..") # file paths are relative to the root of the project directory
library(GFPMoutput)
library(dplyr)
library(tidyr)
library(ggplot2)
forarea <- read.csv("rawdata/forestarea.csv", stringsAsFactors = FALSE) %>%
        left_join(countrycodes[c("Country_Code","Country", "EU27")], 
                  by = "Country_Code") %>%
    filter(EU27) %>%
    arrange(desc(forestarea))

forarea %>% head()


paul4forest/GFPMoutput documentation built on May 24, 2019, 8:25 p.m.