From 93a66ab34976e147ba08d013393b1e686652beb2 Mon Sep 17 00:00:00 2001
From: Eva Rifa <eva.rifarovira@bsc.es>
Date: Wed, 22 Nov 2023 14:32:53 +0100
Subject: [PATCH 1/2] Remove export from VizPDFsOLE

---
 NAMESPACE      | 1 -
 R/VizPDFsOLE.R | 1 -
 2 files changed, 2 deletions(-)

diff --git a/NAMESPACE b/NAMESPACE
index 6601969..550a8f9 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 2232321..0a1a715 100644
--- a/R/VizPDFsOLE.R
+++ b/R/VizPDFsOLE.R
@@ -42,7 +42,6 @@
 #'
 #'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) {
-- 
GitLab


From 78bdfc3cef9bd3952edca54701a7cc8e87843806 Mon Sep 17 00:00:00 2001
From: Eva Rifa <eva.rifarovira@bsc.es>
Date: Wed, 22 Nov 2023 14:38:08 +0100
Subject: [PATCH 2/2] Add dontrun

---
 R/VizPDFsOLE.R    | 17 +++++++++--------
 man/VizPDFsOLE.Rd | 17 +++++++++--------
 2 files changed, 18 insertions(+), 16 deletions(-)

diff --git a/R/VizPDFsOLE.R b/R/VizPDFsOLE.R
index 0a1a715..5ae68e3 100644
--- a/R/VizPDFsOLE.R
+++ b/R/VizPDFsOLE.R
@@ -32,15 +32,16 @@
 #'@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
 VizPDFsOLE <- function(pdf_1, pdf_2, nsigma = 3, legendPos = 'bottom', 
                        legendSize = 1.0, plotfile = NULL, width = 30, 
diff --git a/man/VizPDFsOLE.Rd b/man/VizPDFsOLE.Rd
index 165b595..726d06f 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}
-- 
GitLab