update example

Damonsoul · Nov 5, 2024 · 3a40319 · 3a40319
1 parent 48f62c8
commit 3a40319
Show file tree

Hide file tree

Showing 4 changed files with 11 additions and 7 deletions.
diff --git a/R/addAreaPolygons.R b/R/addAreaPolygons.R
@@ -14,8 +14,8 @@
 #' library(leaflet)
 #' m <- leaflet() %>% addTilesAmap()
 #' m <- addAreaPolygons(m,
-#'   longitude = c(116.404, 116.407, 116.409),
-#'   latitude = c(39.916, 39.919, 39.917), coordinate = "WGS-84"
+#'   longitude = c(31.1, 39.919, 39.917),
+#'   latitude = c(121.0, 121.1, 121.2), coordinate = "WGS-84"
 #' )
 #' m
 addAreaPolygons <- function(map, longitude, latitude, coordinate = "WGS-84") {

diff --git a/R/areaCalculator.R b/R/areaCalculator.R
@@ -14,7 +14,7 @@
 #'
 #' @examples
 #' area <- areaCalculator(
-#'   latitude = c(31.0, 31.1, 31.2),
+#'   latitude = c(31.1, 39.919, 39.917),
 #'   longitude = c(121.0, 121.1, 121.2), coordinate = "WGS-84"
 #' )
 areaCalculator <- function(longitude,

diff --git a/man/addAreaPolygons.Rd b/man/addAreaPolygons.Rd
diff --git a/man/areaCalculator.Rd b/man/areaCalculator.Rd