leafletR (version 0.4-0)

styleSingle: Single symbol styling

Description

Creates a single symbol style.

Usage

styleSingle(col, lwd, alpha, fill, fill.alpha, rad, marker)
singles(col, lwd, alpha, fill, fill.alpha, rad, marker)

Arguments

col

Color used for lines, i.e. lines itself, borders of polygons and circle borders (points). Color might be given as name, number [0-8] or hexadecimal code. If fill is not specified, col is used for border and circle area. If col is NA, the border is omitted.

lwd

Line width in number of pixels -- default is 2.

alpha

Opacity of a line or border, as numeric value between 0 (fully transparent) and 1 (opaque).

fill

Fill color used for polygons and circles (points). Color might be given as name, number [0-8] or hexadecimal code. If fill is NA, the circle area is left blank.

fill.alpha

Opacity of a polygon or circle area, as numeric value between 0 (fully transparent) and 1 (opaque).

rad

Radius of circles (points), in number of pixels -- default is 10.

marker

Color (given like col), or a vector of label (see https://www.mapbox.com/maki/ for available labels), color (given like col) and size (s=small, m=medium, l=large). Points are displayed as markers (all other arguments are ignored).

Value

See Also

styleGrad, styleCat, leaflet

Examples

## Not run: 
# ## point data ##
# # prepare data
# data(quakes)
# dat <- toGeoJSON(data=quakes, dest=tempdir())
# 
# # change circle borders
# # note: if fill color is not specified, col is also used as fill color 
# sty <- styleSingle(col=2, lwd=1, alpha=1)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# # change fill color, alpha and radius
# sty <- styleSingle(fill="red", fill.alpha=1, rad=2)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# # no border
# sty <- styleSingle(col=NA)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# # blank circle area
# sty <- styleSingle(fill=NA)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# # simple colored markers
# sty <- styleSingle(marker="red") # only color
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# # markers with label, color and size
# sty <- styleSingle(marker=c("triangle", "#E41A1C", "s"))
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# # change all arguments
# sty <- styleSingle(col="#d4d4d4", lwd=1, alpha=0.8, 
#   fill="darkred", fill.alpha=0.4, rad=4)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# 
# ## line data ##
# # prepare data
# # (httr package required)
# dat <- toGeoJSON(data=system.file(package="leafletR", "files", 
#   "lynx.zip"), name="Lynx telemetry", dest=tempdir())
# 
# # style
# sty <- styleSingle(col="#bb650b", lwd=3, alpha=0.8)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# 
# ## polygon data ##
# # prepare data
# dat <- system.file(package="leafletR", "files", "park_sk.geojson")
# 
# # change borders
# # note: if fill color is not specified, col is also used as fill color 
# sty <- styleSingle(col=3, lwd=2, alpha=1)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# # change fill color and alpha
# sty <- styleSingle(fill="darkgreen", fill.alpha=0.8)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# # no border
# sty <- styleSingle(col=NA)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# # blank polygon area
# sty <- styleSingle(fill=NA)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# 
# # change all arguments
# sty <- styleSingle(col="#006400", lwd=5, alpha=0.8, 
#   fill="darkgreen", fill.alpha=0.4)
# map <- leaflet(data=dat, dest=tempdir(), style=sty)
# ## End(Not run)