library(tradeflows) library(knitr) opts_knit$set(root.dir="../..") # file paths are relative to the root of the project directory opts_knit$set(fig.width=12) library(dplyr) library(ggplot2) library(tidyr)
rawflow <- readdbtbl("raw_flow_yearly") %>% filter(productcode == 440799) %>% collect() valid <- readdbtbl("validated_flow_yearly") %>% filter(productcode == 440799) %>% collect() valid2 <- rawflow %>% clean()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.