#Read example data
settings <- read.csv(system.file('extdata',
'Ex_20200617_090000_Settings.csv', package = 'locaR'),
stringsAsFactors = FALSE)
#Over-write default values for SiteWavsFolder, CoordinatesFile, and ChannelsFile
settings$Value[settings$Setting == 'SiteWavsFolder'] <-
system.file('extdata', package = 'locaR')
settings$Value[settings$Setting == 'CoordinatesFile'] <-
system.file('extdata', 'Vignette_Coordinates.csv',
package = 'locaR')
settings$Value[settings$Setting == 'ChannelsFile'] <-
system.file('extdata', 'Vignette_Channels.csv',
package = 'locaR')
#Run processSettings() function
st <- processSettings(settings = settings, getFilepaths = FALSE)
#Get filepaths.
fp <- getFilepaths(settings = st, types = 'mp3')
Run the code above in your browser using DataLab