# NOT RUN {
# }
# NOT RUN {
# create dummy directory for tests (this will be used as inDir)
# (normally, you'd set up an empty directory, e.g. .../myStudy/rawImages)
wd_createStationDir <- file.path(tempdir(), "createStationFoldersTest")
# now we load the sample camera trap station data frame
data(camtraps)
# create station directories in wd_createStationDir
StationFolderCreate1 <- createStationFolders (inDir = wd_createStationDir,
stations = as.character(camtraps$Station),
createinDir = TRUE)
StationFolderCreate1
# check if directories were created
list.dirs(wd_createStationDir)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab