addOpacitySlider: Add opacity slider control to map

In leaflet.opacity: Opacity Controls for Leaflet Maps

Description

Add opacity slider control to map

Usage

addOpacitySlider(map, layerId)

Arguments

map	Leaflet map
layerId	Opacity layer

Author(s)

Marc Becker

Examples

# Libraries
library(leaflet)
library(leaflet.opacity)
library(raster)

# Create artificial layer
r <- raster(xmn = -2.8, xmx = -2.79, ymn = 54.04, ymx = 54.05, nrows = 30, ncols = 30)
values(r) <- matrix(1:900, nrow(r), ncol(r), byrow = TRUE)
crs(r) <- CRS("+init=epsg:4326")

# Create leaflet map with opacity slider
leaflet() %>%
  addTiles() %>%
  addRasterImage(r, layerId = "raster") %>%
  addOpacitySlider(layerId = "raster")

Example output

Loading required package: sp
Warning messages:
1: In showSRID(uprojargs, format = "PROJ", multiline = "NO", prefer_proj = prefer_proj) :
  Discarded ellps WGS 84 in CRS definition: +proj=merc +a=6378137 +b=6378137 +lat_ts=0 +lon_0=0 +x_0=0 +y_0=0 +k=1 +units=m +nadgrids=@null +wktext +no_defs +type=crs
2: In showSRID(uprojargs, format = "PROJ", multiline = "NO", prefer_proj = prefer_proj) :
  Discarded datum World Geodetic System 1984 in CRS definition
3: In showSRID(uprojargs, format = "PROJ", multiline = "NO", prefer_proj = prefer_proj) :
  Discarded ellps WGS 84 in CRS definition: +proj=merc +a=6378137 +b=6378137 +lat_ts=0 +lon_0=0 +x_0=0 +y_0=0 +k=1 +units=m +nadgrids=@null +wktext +no_defs +type=crs
4: In showSRID(uprojargs, format = "PROJ", multiline = "NO", prefer_proj = prefer_proj) :
  Discarded datum World Geodetic System 1984 in CRS definition

leaflet.opacity documentation built on May 1, 2019, 9:45 p.m.