From 53e0764b7ee2435ff3f6c8f99de9501da4a96b48 Mon Sep 17 00:00:00 2001
From: Laura DeCicco <ldecicco@usgs.gov>
Date: Thu, 14 Mar 2013 11:35:13 -0500
Subject: [PATCH] Updated examples in help files.
---
R/getPreLoadedSampleData.r | 7 +++----
man/getDailyDataFromFile.Rd | 4 ++--
man/getPreLoadedData.Rd | 2 ++
man/getPreLoadedSampleData.Rd | 2 +-
4 files changed, 8 insertions(+), 7 deletions(-)
diff --git a/R/getPreLoadedSampleData.r b/R/getPreLoadedSampleData.r
index 896fa427..0480682c 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 3854df5a..95f1ece4 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 8236b50a..8aefe64a 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 09de2010..50708517 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}
--
GitLab