diff --git a/NAMESPACE b/NAMESPACE index 6601969aa0e3768771c9f42eb7a5a54969b33828..550a8f9543a6b8a89619ff1343f7da3169ff861f 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -10,7 +10,6 @@ export(VizEquiMap) export(VizForecastPDF) export(VizLayout) export(VizMostLikelyQuantileMap) -export(VizPDFsOLE) export(VizRobinson) export(VizStereoMap) export(VizTriangles4Categories) diff --git a/R/VizPDFsOLE.R b/R/VizPDFsOLE.R index 2232321d01654e38bf3938b6f55f68e36fe430ce..5ae68e3ea17ad80192cbc5d5418e069fa36e6c12 100644 --- a/R/VizPDFsOLE.R +++ b/R/VizPDFsOLE.R @@ -32,17 +32,17 @@ #'@return VizPDFsOLE() returns a ggplot object containing the plot. #' #'@examples -#'# Example 1 -#'pdf_1 <- c(1.1,0.6) -#'attr(pdf_1, "name") <- "NAO1" -#'dim(pdf_1) <- c(statistic = 2) -#'pdf_2 <- c(1,0.5) -#'attr(pdf_2, "name") <- "NAO2" -#'dim(pdf_2) <- c(statistic = 2) +#'\dontrun{ +#' pdf_1 <- c(1.1,0.6) +#' attr(pdf_1, "name") <- "NAO1" +#' dim(pdf_1) <- c(statistic = 2) +#' pdf_2 <- c(1,0.5) +#' attr(pdf_2, "name") <- "NAO2" +#' dim(pdf_2) <- c(statistic = 2) #' -#'VizPDFsOLE(pdf_1, pdf_2) +#' VizPDFsOLE(pdf_1, pdf_2) +#'} #'@import ggplot2 stats -#'@export VizPDFsOLE <- function(pdf_1, pdf_2, nsigma = 3, legendPos = 'bottom', legendSize = 1.0, plotfile = NULL, width = 30, height = 15, units = "cm", dpi = 300) { diff --git a/man/VizPDFsOLE.Rd b/man/VizPDFsOLE.Rd index 165b5952232dcb9b778555f6b42da366a678d128..726d06fdbef20f4b9e37f473fe5e9c801a7b8214 100644 --- a/man/VizPDFsOLE.Rd +++ b/man/VizPDFsOLE.Rd @@ -59,15 +59,16 @@ This function plots two probability density gaussian functions and the optimal linear estimation (OLE) as result of combining them. } \examples{ -# Example 1 -pdf_1 <- c(1.1,0.6) -attr(pdf_1, "name") <- "NAO1" -dim(pdf_1) <- c(statistic = 2) -pdf_2 <- c(1,0.5) -attr(pdf_2, "name") <- "NAO2" -dim(pdf_2) <- c(statistic = 2) +\dontrun{ + pdf_1 <- c(1.1,0.6) + attr(pdf_1, "name") <- "NAO1" + dim(pdf_1) <- c(statistic = 2) + pdf_2 <- c(1,0.5) + attr(pdf_2, "name") <- "NAO2" + dim(pdf_2) <- c(statistic = 2) -VizPDFsOLE(pdf_1, pdf_2) + VizPDFsOLE(pdf_1, pdf_2) +} } \author{ Eroteida Sanchez-Garcia - AEMET, //email{esanchezg@aemet.es}