knitr::opts_chunk$set( collapse = TRUE, comment = "#>" ) library(echarts4r) e_common( font_family = "Raleway" )
Pictorial bar chart is a type of bar chart that custimzed glyph (like images, SVG PathData) can be used instead of rectangular bar. This kind of chart is usually used in infographic.
y <- rnorm(10, 10, 2) df <- data.frame( x = 1:10, y = y, z = y - rnorm(10, 5, 1) ) df |> e_charts(x) |> e_bar(z, barWidth = 10) |> e_pictorial(y, symbol = "rect", symbolRepeat = TRUE, z = -1, symbolSize = c(10, 4)) |> e_theme("westeros") |> e_title("Built-in symbols")
echarts4r.assets now includes icons you can easily include in your plots.
library(echarts4r.assets) mtcars |> e_charts(mpg) |> e_scatter( wt, qsec, symbol = ea_icons("trash"), name = "Trash" ) |> e_legend(icons = ea_icons("trash"))
path <- "path://M0,10 L10,10 C5.5,10 5.5,5 5,0 C4.5,5 4.5,10 0,10 z" style <- list( normal = list(opacity = 0.5), # normal emphasis = list(opacity = 1) # on hover ) df |> e_charts(x) |> e_pictorial(y, symbol = path, barCategoryGap = "-130%", itemStyle = style) |> e_title("SVG path")
qomo <- paste0( "https://echarts.apache.org/examples/", "data/asset/img/hill-Qomolangma.png" ) kili <- paste0( "https://echarts.apache.org/examples/", "data/asset/img/hill-Kilimanjaro.png" ) data <- data.frame( x = c("Qomolangma", "Kilimanjaro"), value = c(8844, 5895), symbol = c(paste0("image://", qomo), paste0("image://", kili)) ) data |> e_charts(x) |> e_pictorial(value, symbol) |> e_legend(FALSE) |> e_title("Images", "Mountains height")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.