How to load various types of files in R.
This function has two roles: 1) to proceed with the loading of files that are in a simList or 2) as a short cut to simInit(inputs = filelist). Generally not to be used by a user.
A data.frame
with information on how to load various types of files in R,
containing the columns:
exts
: the file extension;
fun
: the function to use for files with this file extension;
package
: the package from which to load fun
.
.fileExtensions() loadFiles(sim, filelist, ...) # S4 method for simList,missing loadFiles(sim, filelist, ...) # S4 method for missing,ANY loadFiles(sim, filelist, ...) # S4 method for missing,missing loadFiles(sim, filelist, ...) .saveFileExtensions()
sim |
|
---|---|
filelist |
|
... | Additional arguments. |
Eliot McIntire and Alex Chubaty
if (FALSE) { # Load random maps included with package filelist <- data.frame( files = dir(system.file("maps", package = "quickPlot"), full.names = TRUE, pattern = "tif"), functions = "rasterToMemory", package = "quickPlot" ) sim1 <- loadFiles(filelist = filelist) clearPlot() if (interactive()) Plot(sim1$DEM) # Second, more sophisticated. All maps loaded at time = 0, and the last one is reloaded # at time = 10 and 20 (via "intervals"). # Also, pass the single argument as a list to all functions... # specifically, when add "native = TRUE" as an argument to the raster function files = dir(system.file("maps", package = "quickPlot"), full.names = TRUE, pattern = "tif") arguments = I(rep(list(native = TRUE), length(files))) filelist = data.frame( files = files, functions = "raster::raster", objectName = NA, arguments = arguments, loadTime = 0, intervals = c(rep(NA, length(files)-1), 10) ) sim2 <- loadFiles(filelist = filelist) # if we extend the end time and continue running, it will load an object scheduled # at time = 10, and it will also schedule a new object loading at 20 because # interval = 10 end(sim2) <- 20 sim2 <- spades(sim2) # loads the percentPine map 2 more times, once at 10, once at 20 }