sidebar_tabs ID.... in antpathOptions to be able to set the pane (e.g.: renderer= JS('L.svg({pane: "my-pane"})'))clusterCharts using Leaflet.markercluster and d3 for piechart and barcharts.addClusterCharts to enable pie and bar charts in Marker clusters using Leaflet.markercluster, d3 and L.DivIcon, with support for customizable category styling and various aggregation methods like sum, min, max, mean, and median.geojsonsf to yyjsonr (heightgraph, timeslider, clustercharts)Clusters markers on a Leaflet map and visualizes them using
+customizable charts, such as pie or bar charts, showing counts by category.
+When using the "custom" type, a pie chart is rendered with aggregated data,
+employing methods like sum, min, max, mean, or median.
addClusterCharts(
+ map,
+ layerId = NULL,
+ group = NULL,
+ type = c("pie", "bar", "horizontal", "custom"),
+ aggregation = c("sum", "min", "max", "mean", "median"),
+ valueField = NULL,
+ options = clusterchartOptions(),
+ icon = NULL,
+ html = NULL,
+ popup = NULL,
+ popupOptions = NULL,
+ label = NULL,
+ labelOptions = NULL,
+ clusterOptions = NULL,
+ clusterId = NULL,
+ categoryField,
+ categoryMap,
+ popupFields = NULL,
+ popupLabels = NULL,
+ markerOptions = NULL,
+ legendOptions = list(title = "", position = "topright"),
+ data = getMapData(map)
+)a map widget object created from leaflet()
the layer id
the name of the group the newly created layers should belong to
+(for clearGroup and addLayersControl purposes).
+Human-friendly group names are permitted–they need not be short,
+identifier-style names. Any number of layers and even different types of
+layers (e.g. markers and polygons) can share the same group name.
The type of chart to use for clusters: "pie", "bar", "horizontal", or "custom".
Aggregation method for "custom" charts (e.g., sum, min, max, mean, median).
Column name with values to aggregate for "custom" charts.
Additional options for cluster charts (see clusterchartOptions).
An icon or set of icons to include, created with makeIcon or iconList.
The column name containing the HTML content to include in the markers.
The column name used to retrieve feature properties for the popup.
A Vector of popupOptions to provide popups
a character vector of the HTML content for the labels
A Vector of labelOptions to provide label
+options for each label. Default NULL
if not NULL, markers will be clustered using
+Leaflet.markercluster;
+ you can use markerClusterOptions() to specify marker cluster
+options
the id for the marker cluster layer
Column name for categorizing charts.
A data.frame mapping categories to chart properties (e.g., label, color, icons, stroke).
A string or vector of strings indicating the column names to include in popups.
A string or vector of strings indicating the labels for the popup fields.
Additional options for markers (see markerOptions::markerOptions()).
A list of options for the legend, including the title and position.
the data object from which the argument values are derived; by
+default, it is the data object provided to leaflet()
+initially, but can be overridden
The `clusterCharts` use Leaflet's `L.DivIcon`, allowing you to fully customize +the styling of individual markers and clusters using CSS. Each individual marker +within a cluster is assigned the CSS class `clustermarker`, while the entire +cluster is assigned the class `clustermarker-cluster`. You can modify the appearance +of these elements by targeting these classes in your custom CSS.
+Other clusterCharts:
+clusterchartOptions()
# Example usage:
+library(sf)
+#> Linking to GEOS 3.10.2, GDAL 3.4.1, PROJ 8.2.1; sf_use_s2() is TRUE
+library(leaflet)
+library(leaflet.extras2)
+
+data <- sf::st_as_sf(breweries91)
+categories <- c("Schwer", "Mäßig", "Leicht", "kein Schaden")
+data$category <- sample(categories, size = nrow(data), replace = TRUE)
+
+## Pie Chart
+leaflet() %>%
+ addProviderTiles("CartoDB.Positron") %>%
+ leaflet::addLayersControl(overlayGroups = "clustermarkers") %>%
+ addClusterCharts(data = data
+ , categoryField = "category"
+ , categoryMap = data.frame(labels = categories,
+ colors = c("#F88", "#FA0", "#FF3", "#BFB"),
+ strokes = "gray")
+ , group = "clustermarkers"
+ , popupFields = c("brewery", "address", "zipcode", "category")
+ , popupLabels = c("Brauerei", "Adresse", "PLZ", "Art")
+ , label = "brewery"
+ )
+
+
+## Bar Chart
+leaflet() %>%
+ addProviderTiles("CartoDB.Positron") %>%
+ leaflet::addLayersControl(overlayGroups = "clustermarkers") %>%
+ addClusterCharts(data = data
+ , type = "bar"
+ , categoryField = "category"
+ , categoryMap = data.frame(labels = categories,
+ colors = c("#F88", "#FA0", "#FF3", "#BFB"),
+ strokes = "gray")
+ , group = "clustermarkers"
+ , popupFields = c("brewery", "address", "zipcode", "category")
+ , popupLabels = c("Brauerei", "Adresse", "PLZ", "Art")
+ , label = "brewery")
+
+
+## Custom Pie Chart with "mean" aggregation on column "value"
+data <- sf::st_as_sf(breweries91)
+categories <- c("Schwer", "Mäßig", "Leicht", "kein Schaden")
+data$category <- sample(categories, size = nrow(data), replace = TRUE)
+data$value <- round(runif(nrow(data), 0, 100), 0)
+
+leaflet() %>%
+ addProviderTiles("CartoDB.Positron") %>%
+ leaflet::addLayersControl(overlayGroups = "clustermarkers") %>%
+ addClusterCharts(data = data
+ , type = "custom"
+ , valueField = "value"
+ , aggregation = "mean"
+ , categoryField = "category"
+ , categoryMap = data.frame(labels = categories,
+ colors = c("#F88", "#FA0", "#FF3", "#BFB"),
+ strokes = "gray")
+ , options = clusterchartOptions(rmax=50, digits=0, innerRadius = 20)
+ , group = "clustermarkers"
+ , popupFields = c("brewery", "address", "zipcode", "category","value")
+ , popupLabels = c("Brauerei", "Adresse", "PLZ", "Art", "Value")
+ , label = "brewery"
+ )
+
+
+## For Shiny examples, please run:
+# runApp(system.file("examples/clusterCharts_app.R", package = "leaflet.extras2"))
+# runApp(system.file("examples/clustercharts_sum.R", package = "leaflet.extras2"))
+Adds options for clusterCharts
+clusterchartOptions(
+ rmax = 30,
+ size = c(20, 20),
+ width = 40,
+ height = 50,
+ strokeWidth = 1,
+ innerRadius = 10,
+ labelBackground = FALSE,
+ labelFill = "white",
+ labelStroke = "black",
+ labelColor = "black",
+ labelOpacity = 0.9,
+ digits = 2,
+ sortTitlebyCount = TRUE
+)The maximum radius of the clusters.
The size of the cluster markers.
The width of the bar-charts.
The height of the bar-charts.
The stroke width of the chart.
The inner radius of pie-charts.
Should the label have a background? Default is `FALSE`
The label background color. Default is `white`
The label stroke color. Default is `black`
The label color. Default is `black`
The label color. Default is `0.9`
The amount of digits. Default is `2`
Should the svg-title be sorted by count or by the categories.
Other clusterCharts:
+addClusterCharts()
markermenuItems()
markermenuItems
addClusterCharts
clusterchartOptions
| ' + label + ': | ' + val + ' |
| ' + label + ': | ' + val + ' |