diff --git a/R/edit.R b/R/edit.R index 669e039..09960cf 100644 --- a/R/edit.R +++ b/R/edit.R @@ -55,8 +55,8 @@ #' par(ask=FALSE) #' plot(raster) #' -#' # Read bitmap arrays from from other image packages -#' curl::curl_download("https://jeroen.github.io/images/example.webp", "example.webp") +#' # Read bitmap arrays from other image packages +#' download.file("https://jeroen.github.io/images/example.webp", "example.webp", mode = 'wb') #' if(require(webp)) image_read(webp::read_webp("example.webp")) #' unlink(c("example.webp", "output.png")) image_read <- function(path, density = NULL, depth = NULL, strip = FALSE, coalesce = TRUE, defines = NULL){ diff --git a/man/editing.Rd b/man/editing.Rd index 443eb98..f2d82ad 100644 --- a/man/editing.Rd +++ b/man/editing.Rd @@ -202,8 +202,8 @@ raster <- as.raster(frink) par(ask=FALSE) plot(raster) -# Read bitmap arrays from from other image packages -curl::curl_download("https://jeroen.github.io/images/example.webp", "example.webp") +# Read bitmap arrays from other image packages +download.file("https://jeroen.github.io/images/example.webp", "example.webp", mode = 'wb') if(require(webp)) image_read(webp::read_webp("example.webp")) unlink(c("example.webp", "output.png")) if(require(rsvg)){