# NOT RUN {
filePath <- system.file("extdata", package="dataRetrieval")
filePath <- paste(filePath,"/",sep="")
fileName <- 'ChoptankRiverNitrate.csv'
Sample <- getUserSample(filePath,fileName, separator=";",interactive=FALSE)
# }
Run the code above in your browser using DataLab