setup.R

library(ReadPDF); library(XML)
invisible(lapply(list.files("../ReadPDF/R", pattern = "\\.R$", full = TRUE), source))

pdfs = list.files("../Jacob/Data", pattern = "2015.2016.pdf$", full = TRUE)
xml = gsub("pdf$", "xml", pdfs)
x = xml[file.exists(xml)]





table(sapply(pct, is, 'try-error'))
dsidavis/LCAP documentation built on May 15, 2019, 4:19 p.m.