From f45ee22c9a94ddfebea975c00a72ba0969970148 Mon Sep 17 00:00:00 2001 From: Steffi LaZerte Date: Tue, 1 Sep 2020 13:19:49 -0500 Subject: [PATCH] Update docs and man for normals example --- docs/reference/normals_dl.html | 9 +++++++-- docs/reference/stations_dl.html | 2 +- man/normals_dl.Rd | 3 +++ 3 files changed, 11 insertions(+), 3 deletions(-) diff --git a/docs/reference/normals_dl.html b/docs/reference/normals_dl.html index c2127f6..b7e0284 100644 --- a/docs/reference/normals_dl.html +++ b/docs/reference/normals_dl.html @@ -232,6 +232,8 @@

Details

Examples


+# \donttest{
+
 # Find the climate_id
 stations_search("Brandon A", normals_only = TRUE)
#> # A tibble: 1 x 11
 #>   prov  station_name station_id climate_id WMO_id TC_id   lat   lon  elev tz   
@@ -242,8 +244,10 @@ 
Examp
 n <- normals_dl(climate_ids = "5010480")
 
 # Pull out last frost data
-library(tidyr)
-f <- unnest(n, frost)
+library(tidyr)
#> 
+#> Attaching package: ‘tidyr’
#> The following object is masked from ‘package:testthat’:
+#> 
+#>     matches
f <- unnest(n, frost)
 
 # Pull out normals
 nm <- unnest(n, normals)
@@ -268,6 +272,7 @@ 
Examp
 nm <- unnest(n, normals)
 f <- unnest(n, frost)
 both <- dplyr::full_join(nm, f)
#> Joining, by = c("prov", "station_name", "climate_id", "meets_wmo")

+# }
#> According to Environment Canada, Modified Date: 2020-08-25 23:30 UTC
#> Environment Canada Disclaimers: + }
#> Loading required namespace: sf
#> According to Environment Canada, Modified Date: 2020-08-31 23:30 UTC
#> Environment Canada Disclaimers: #> "Station Inventory Disclaimer: Please note that this inventory list is a snapshot of stations on our website as of the modified date, and may be subject to change without notice." #> "Station ID Disclaimer: Station IDs are an internal index numbering system and may be subject to change without notice."
#> # A tibble: 85 x 14 #> prov station_name station_id climate_id WMO_id TC_id lat lon elev tz diff --git a/man/normals_dl.Rd b/man/normals_dl.Rd index a6a22d2..fde382d 100644 --- a/man/normals_dl.Rd +++ b/man/normals_dl.Rd @@ -65,6 +65,8 @@ Climate normals are downloaded from the url stored in option } \examples{ +\donttest{ + # Find the climate_id stations_search("Brandon A", normals_only = TRUE) @@ -95,3 +97,4 @@ f <- unnest(n, frost) both <- dplyr::full_join(nm, f) } +}