Appendix A: Fast Example of VEIN

library(vein)
inventory(name = file.path(tempdir(), "YourCity"),
          show.dir = TRUE,
          show.scripts = TRUE)
source(paste0(file.path(tempdir(), "YourCity"), "main.R"))