# NOT RUN {
file <- system.file("extdata", "oildata.csv", package = "olr", mustWork = TRUE)
oildata <- read.csv(file, header = TRUE)
datasetname <- oildata
resvarname <- 'OilPrices'
expvarnames <- c('SP500', 'RigCount', 'API', 'Field_Production', 'RefinerNetInput', 'Imports')
olr(datasetname, resvarname, expvarnames, adjr2 = TRUE)
# }
Run the code above in your browser using DataLab