fix #172 i think wicket integration is done, closing issue

bumped patch version due to the change

Author: sckott

DESCRIPTION

@@ -8,7 +8,7 @@ Description: A programmatic interface to many species occurrence data sources,
     System ('OBIS'), and Atlas of Living Australia ('ALA'). Includes
     functionality for retrieving species occurrence data, and combining
     those data.
-Version: 0.6.0.9131
+Version: 0.6.2.9100
 License: MIT + file LICENSE
 Authors@R: c(
     person("Scott", "Chamberlain", role = c("aut", "cre"), email = "myrmecocystus@gmail.com"),
@@ -32,7 +32,7 @@ Imports:
     jsonlite (>= 1.1),
     data.table (>= 1.9.6),
     tibble (>= 1.2),
-    wicket (>= 0.1.0)
+    wicket (>= 0.2.0)
 Suggests:
     testthat,
     knitr,

R/wkt_bbox.R

@@ -14,7 +14,7 @@
 #' wkt2bbox returns a numeric vector of length 4, like c(minx, miny, 
 #' maxx, maxy).
 #' 
-#' @examples \dontrun{
+#' @examples
 #' # Convert a bounding box to a WKT
 #'
 #' ## Pass in a vector of length 4 with all values
@@ -26,7 +26,20 @@
 #' # Convert a WKT object to a bounding box
 #' wkt <- "POLYGON((-125 38.4,-125 40.9,-121.8 40.9,-121.8 38.4,-125 38.4))"
 #' wkt2bbox(wkt)
-#' }
+#' 
+#' identical(
+#'  bbox2wkt(-125.0, 38.4, -121.8, 40.9),
+#'  "POLYGON((-125 38.4,-125 40.9,-121.8 40.9,-121.8 38.4,-125 38.4))"
+#' )
+#' 
+#' identical(
+#'  c(-125.0, 38.4, -121.8, 40.9),
+#'  as.numeric(
+#'    wkt2bbox(
+#'      "POLYGON((-125 38.4,-125 40.9,-121.8 40.9,-121.8 38.4,-125 38.4))"
+#'    )
+#'  )
+#' )
 bbox2wkt <- function(minx=NA, miny=NA, maxx=NA, maxy=NA, bbox=NULL) {
   if (is.null(bbox)) bbox <- list(c(minx, miny, maxx, maxy))
   wicket::bounding_wkt(values = bbox)