Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: c7c9dd929f
Fetching contributors…

Cannot retrieve contributors at this time

file 13 lines (12 sloc) 0.355 kb
1 2 3 4 5 6 7 8 9 10 11 12 13
# List R files in this directory (except this file)
fs <- list.files(pattern = ".R$")
fs <- setdiff(fs, c("RunAll.R",
                    "20111005-HSOpen3_lammittely.R",
"20111010-HSOpen3_raportti.R",
"20111023-oikotie.R"))

# Run all R files
for (f in fs) {
  print(paste("Executing", f))
  source(f)
  rm(list = setdiff(ls(), "fs"))
}
Something went wrong with that request. Please try again.