projects.mako.cc - redirect-tools/blob - 02-generate_spells.R

   1 source("redirect_tools.R")
   2
   3 # save the run number
   4 setwd(redirect.data.dir)
   5 redirect.spells <- filename.to.spells(list.files())
   6
   7 setwd(spells.data.dir)
   8 save(redirect.spells, file="redirect_spells.RData")
   9
  10 write.csv(redirect.spells, file="redirect_spells.tsv", sep="\t"
  11                  fileEncoding="UTF-8", row.names=FALSE)
  12
  13 library(foreign)
  14 write.dta(redirect.spells, file="redirect_spells.dta")
  15
  16