自定义图标散点图

作者

[编辑] 郑虎;

[审核] .

可自定义图标的散点图。

环境配置

  • 系统: Cross-platform (Linux/MacOS/Windows)

  • 编程语言: R

  • 依赖包: echarts4r; echarts4r.assets

# 安装包
if (!requireNamespace("echarts4r", quietly = TRUE)) {
  install.packages("echarts4r")
}
if (!requireNamespace("echarts4r.assets", quietly = TRUE)) {
  install.packages("echarts4r.assets")
}

# 加载包
library(echarts4r)
library(echarts4r.assets)

数据准备

# 加载数据
data <- read.delim("files/Hiplot/035-custom-icon-scatter-data.txt", header = T)

# 整理数据格式
draw_data <- data.frame(
  x = data[["mpg"]],
  y = data[["wt"]],
  size = data[["qsec"]]
  )
rm(data)

# 查看数据
head(draw_data)
     x     y  size
1 21.0 2.620 16.46
2 21.0 2.875 17.02
3 22.8 2.320 18.61
4 21.4 3.215 19.44
5 18.7 3.440 17.02
6 18.1 3.460 20.22

可视化

# 自定义图标散点图
p <- draw_data |>
  e_charts(x) |>
  e_scatter(
    y,
    size,
    symbol = ea_icons("warning"),
    name = "warning"
    )

p
图 1: 自定义图标散点图