library(tidyverse)
library(tidyr)
library(stringr)
library(xml2)

horizon <- c("lt","mt","st","sst")
modechoice <- c("","nomc")
policy <- c("donothing","reduce","bikelane")

root <- "output/experiments-pieter/set4"