if (FALSE) {
filename <- "USCensusStates_02.rda"
dataDir <- "~/Data/Spatial"
dataUrl <- "http://data.mazamascience.com/MazamaSpatialUtils/Spatial_0.8"
# Load local file
USCensusStates <- loadDataFile(filename, dataDir = dataDir)
# Load remote file
USCensusStates <- loadDataFile(filename, dataUrl = dataUrl)
# Load local file with remote file as backup
USCensusStates <- loadDataFile(
filename,
dataDir = dataDir,
dataUrl = dataUrl,
priority = "dataDir"
)
# Load remote file with local file as backup
USCensusStates <- loadDataFile(
filename,
dataDir = dataDir,
dataUrl = dataUrl,
priority = "dataUrl"
)
}
Run the code above in your browser using DataLab