View source: R/google_map_layer_circle.R
add_circles | R Documentation |
Add circles to a google map
add_circles(
map,
data = get_map_data(map),
id = NULL,
lat = NULL,
lon = NULL,
polyline = NULL,
radius = NULL,
editable = NULL,
draggable = NULL,
stroke_colour = NULL,
stroke_opacity = NULL,
stroke_weight = NULL,
fill_colour = NULL,
fill_opacity = NULL,
mouse_over = NULL,
mouse_over_group = NULL,
info_window = NULL,
layer_id = NULL,
update_map_view = TRUE,
z_index = NULL,
digits = 4,
palette = NULL,
legend = F,
legend_options = NULL,
load_interval = 0,
focus_layer = FALSE
)
map |
a googleway map object created from |
data |
data frame containing the data to use in the layer. If Null, the
data passed into |
id |
string specifying the column containing an identifier for a shape |
lat |
string specifying the column of |
lon |
string specifying the column of |
polyline |
string specifying the column of |
radius |
either a string specifying the column of |
editable |
string specifying the column of |
draggable |
string specifying the column of |
stroke_colour |
either a string specifying the column of |
stroke_opacity |
either a string specifying the column of |
stroke_weight |
either a string specifying the column of |
fill_colour |
either a string specifying the column of |
fill_opacity |
either a string specifying the column of |
mouse_over |
string specifying the column of data to display when the mouse rolls over the shape |
mouse_over_group |
string specifying the column of data specifying which groups of shapes to highlight on mouseover |
info_window |
string specifying the column of data to display in an info window when a shape is clicked. |
layer_id |
single value specifying an id for the layer. Use this value to
distinguish between shape layers for when using any |
update_map_view |
logical specifying if the map should re-centre according to the shapes |
z_index |
single value specifying where the circles appear in the layering
of the map objects. Layers with a higher |
digits |
integer. Use this parameter to specify how many digits (decimal places) should be used for the latitude / longitude coordinates. |
palette |
a function, or list of functions, that generates hex colours given a single number as an input. See details. |
legend |
either a logical indiciating if the legend(s) should be displayed, or a named list indicating which colour attributes should be included in the legend. |
legend_options |
A list of options for controlling the legend. |
load_interval |
time in miliseconds to wait between plotting each shape |
focus_layer |
logical indicating if the map should re-centre according to this layer |
z_index
values define the order in which objects appear on the map.
Those with a higher value appear on top of those with a lower value. The default
order of objects is (1 being underneath all other objects)
1. Polygon
2. Rectangle
3. Polyline
4. Circle
Markers are always the top layer
The palette
is used to specify the colours that will map to variables.
You can specify a single function to map to all variables, or a named list
that specifies a separate function to map to each variable. The elements must
be named either fill_colour
or stroke_colour
, and their values
are the colour generating functions. The default is viridisLite::viridis
The legend_options
can be used to control the appearance of the legend.
This should be a named list, where the names are one of
position - one of c("TOP_LEFT", "TOP_CENTER", "TOP_RIGHT", "RIGHT_TOP",
"RIGHT_CENTER", "RIGHT_BOTTOM", "BOTTOM_RIGHT", "BOTTOM_CENTER", "BOTTOM_LEFT",
"LEFT_BOTTOM", "LEFT_CENTER", "LEFT_TOP")
css - a string of valid css
for controlling the appearance of the legend
title - a string to use for the title of the legend
if legend_options
are NULL, the default values will apply
If you are displaying two legends, one for stroke_colour
and one
for fill_colour
, you can specify different options for the different
colour attributes. See examples for add_circles.
## Not run:
map_key <- 'your_api_key'
google_map(key = map_key, data = tram_stops) %>%
add_circles(lat = "stop_lat", lon = "stop_lon", fill_colour = "stop_name",
stroke_weight = 0.3, stroke_colour = "stop_name", info_window ="stop_id")
## different colour palettes
lstPalette <- list(fill_colour = colorRampPalette(c("red","blue")),
stroke_colour = viridisLite::plasma)
## set the key via set_key()
set_key(key = map_key)
google_map(data = tram_stops) %>%
add_circles(lat = "stop_lat", lon = "stop_lon", fill_colour = "stop_lat",
stroke_weight = 2, stroke_colour = "stop_name", palette = lstPalette, legend = T)
## controlling the legend
google_map(data = tram_stops) %>%
add_circles(lat = "stop_lat", lon = "stop_lon", fill_colour = "stop_lat",
stroke_weight = 2, stroke_colour = "stop_name",
legend = c(fill_colour = T, stroke_colour = F),
legend_options = list(position = "TOP_RIGHT", css = "max-height: 100px;"))
google_map(data = tram_stops) %>%
add_circles(lat = "stop_lat", lon = "stop_lon", fill_colour = "stop_lat",
stroke_weight = 2, stroke_colour = "stop_name",
legend = T,
legend_options = list(
fill_colour = list(position = "TOP_RIGHT", css = "max-height: 100px;"),
stroke_colour = list(position = "LEFT_BOTTOM", title = "Stop Name")
))
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.