diff --git a/R/getPreLoadedSampleData.r b/R/getPreLoadedSampleData.r
index 896fa4279c7fe7d1aae27ab6fca3bde7a844c52a..0480682ca5d9fd6f1425c90e36977034a4a519e3 100644
--- a/R/getPreLoadedSampleData.r
+++ b/R/getPreLoadedSampleData.r
@@ -8,11 +8,10 @@
 #' @export
 #' @return Sample dataframe 
 #' @examples
-#' getPreLoadedSampleData(ChoptankRiverNitrate, interactive=FALSE)
+#' Sample <- getPreLoadedSampleData(ChoptankRiverNitrate, interactive=FALSE)
 getPreLoadedSampleData <- function (loadedData,interactive=TRUE){
-  #   data <- as.data.frame(loadedData, stringsAsFactors=FALSE)
-  data <- getPreLoadedQWData(loadedData)
-  compressedData <- compressData(data,interactive=interactive)
+
+  compressedData <- compressData(loadedData,interactive=interactive)
   Sample <- populateSampleColumns(compressedData)
   return(Sample)
 }
\ No newline at end of file
diff --git a/man/getDailyDataFromFile.Rd b/man/getDailyDataFromFile.Rd
index 3854df5a82b94069f5c836cdd1028064d8148ec8..95f1ece41ac37dce3485e090992a4e76fbc70cc5 100644
--- a/man/getDailyDataFromFile.Rd
+++ b/man/getDailyDataFromFile.Rd
@@ -36,9 +36,9 @@
 \examples{
 # Examples of how to use getDailyDataFromFile:
 # Change the file path and file name to something meaningful:
-#filePath <-  '~/RData/'  # Sample format
+filePath <-  '~/RData/'  # Sample format
 fileName <- 'ChoptankRiverFlow.txt'
-#getDailyDataFromFile(filePath,fileName,separator="\\t")
+\dontrun{getDailyDataFromFile(filePath,fileName,separator="\\t")}
 }
 \keyword{data}
 \keyword{file}
diff --git a/man/getPreLoadedData.Rd b/man/getPreLoadedData.Rd
index 8236b50a4fd9bb81fed88558e163481312d288b7..8aefe64af90936bf7ab631ee19de8d33baa2fdec 100644
--- a/man/getPreLoadedData.Rd
+++ b/man/getPreLoadedData.Rd
@@ -20,7 +20,9 @@
   contains any remark codes.
 }
 \examples{
+ChoptankRiverFlow <- ChoptankRiverFlow
 rawData <- getPreLoadedData(ChoptankRiverFlow)
+rawDataSample <- getPreLoadedData(ChoptankRiverNitrate)
 }
 \keyword{data}
 \keyword{import}
diff --git a/man/getPreLoadedSampleData.Rd b/man/getPreLoadedSampleData.Rd
index 09de20101f44f820f68985d33d2071ee5938c581..50708517441fb2c28f93936156fd4fd6c024f9c7 100644
--- a/man/getPreLoadedSampleData.Rd
+++ b/man/getPreLoadedSampleData.Rd
@@ -21,7 +21,7 @@
   data frame.
 }
 \examples{
-getPreLoadedSampleData(ChoptankRiverNitrate, interactive=FALSE)
+Sample <- getPreLoadedSampleData(ChoptankRiverNitrate, interactive=FALSE)
 }
 \keyword{data}
 \keyword{import}