雷达图可以用于直观的展示几个数据之间的大小差别~
0.R包安装
这个包放在了github上,要用devtools::install_github安装。
# install.packages("devtools")
# devtools::install_github("ricardo-bion/ggradar")
library(ggradar)
1.只画一组数据
df1 = data.frame(t(runif(5)))
colnames(df1) = paste0("A",1:5)
df1 = cbind(Group = "g1",df1)
df1
## Group A1 A2 A3 A4 A5
## 1 g1 0.8823214 0.8348358 0.4659534 0.2649459 0.0525377
ggradar(df1)
数据的第一列内容是不会被画进图里的,从第二列开始才画进去。注意数值范围都是0-1之间。
2.画多组数据
图上的每个分组是同一个颜色,连城同一个圈,对应着数据里的一行。
df <- data.frame(matrix(runif(30), ncol = 10))
df[, 1] <- paste0("G", 1:3)
colnames(df) <- c("Group", paste0("B", 1:9))
df
##