map.plot: Plot map or satellite image

Description Usage Arguments Details Optional graphical parameters Author(s) See Also Examples

View source: R/map.plot.R

Description

Plots a map or satellite image of the met mast location.

Usage

1
2
3
4
map.plot(mast, type=c("satellite", "terrain", "hybrid", "roadmap"), 
  zoom, label, ...)
map(mast, type=c("satellite", "terrain", "hybrid", "roadmap"), 
  zoom, label, ...)

Arguments

mast

Met mast object created by mast.

type

Type of the map as string. One of "satellite" (satellite image), "terrain" (map with terrain information), "hybrid" (satellite image with map overlay) or "roadmap" (map).

zoom

Zoom level as integer from 1 (small scale) up to 18 (large scale) – default is 15.

label

Label to be placed next to the location symbol as string. Set to NA to leave the label blank. If ignored, the location coordinates are used as label default.

...

Optional graphical parameters, see below for details.

Details

This function is based on the RgoogleMaps package by Markus Loecher, which uses the Google Static Maps API.

Optional graphical parameters

The following graphical parameters can optionally be added to customize the plot:

Author(s)

Christian Graul

See Also

mast

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
## Not run: 
# load and prepare data
data("winddata", package="bReeze")
set1 <- set(height=40, v.avg=winddata[,2])
ts <- timestamp(winddata[,1])
neubuerg <- mast(timestamp=ts, set1, loc=c(49.8909,11.4017))

# plot satellite image
map.plot(neubuerg)

# plot terrain map
map.plot(neubuerg, type="terrain")

# change zoom level
map.plot(neubuerg, zoom=1)
map.plot(neubuerg, zoom=18)

# change symbol (and label) 
map.plot(neubuerg, col="white", pch="+", cex=2)

# change label
map.plot(neubuerg, col.lab=3, cex.lab=1.5)
map.plot(neubuerg, pos.lab=1)
map.plot(neubuerg, label="Site #247 - Neubuerg")  # custom label
map.plot(neubuerg, label=NA)  # no label

## End(Not run)

bReeze documentation built on May 2, 2019, 3:32 p.m.