source_with_errors.R

# source files with errors
# https://stackoverflow.com/questions/14612190/is-there-a-way-to-source-and-continue-after-an-error

# Source TD Data Pull
ll <- parse(file = "11-tda_pull.R")

for (i in seq_along(ll)) {
    tryCatch(eval(ll[[i]]), 
             error = function(e) message("Oops!  ", as.character(e)))
}