是否可以在R中绘制一个雷达图，其中每个圆具有不同的颜色？

Question

使用fsmb软件包，我创建了一个简单的雷达图。 这是一个可重现的示例：

#install.packages("fmsb")
library(fmsb)
data <- data.frame(rbind(rep(8,14),
          rep(0,14),
          c(3,4,4,4,3,4,4,4,4,3,3,3,3,3)))
colnames(data) <- c("biologia", "chemia", "fizyka", "geografia", "historia", "informatyka", "język angielski", "język polski", "matematyka", "muzyka / historia muzyki", "plastyka / sztuka / historia sztuki", "sprawność fizyczna", "technika","wiedza o społeczeństwie" )

radarchart(data, 
       axistype=1 ,
       pcol=rgb(0.2,0.5,0.5,0.5), 
       pfcol=rgb(0.2,0.5,0.5,0.5),
       plwd=4,
       cglcol="grey", 
       cglty=1, 
       axislabcol="grey", 
       caxislabels=seq(0,8,2), cglwd=0.8,
       vlcex=0.8)

它会生成带有填充多边形的常规雷达图。

但是，我希望内部区域更具色彩，这意味着我想用不同的颜色给每个内部圆上色，而将多边形的外部区域保留为空白，以便类别之间的差异更容易被观众看到**。

如果有人知道如何实现这一目标，我将非常感激：）

Answer 1

您可以添加更多“数据”来创建与网格对齐的其他多边形。 我为附加数据设置了pcol = NA，以便我们只得到没有点的多边形。 我做出了一些合理的颜色选择，但请注意，多边形全部重叠，因此颜色会增加。

## Your data with additional polygons aligned to grid
data <- data.frame(rbind(rep(8,14),
          rep(0,14),
          rep(4,14), rep(6,14), rep(8,14),
          c(3,4,4,4,3,4,4,4,4,3,3,3,3,3)))

## Your color - to avoid repetition
COL1 = rgb(0.2,0.5,0.5,0.5)

## Plot
radarchart(data, 
       axistype=1 ,
       pcol=c(NA, NA, NA, COL1),
       pfcol=c("#FF000022", "#FF990022","#FFFF0022", COL1),
       plwd=4,
       cglcol="grey", 
       cglty=1, 
       axislabcol="grey", 
       caxislabels=seq(0,8,2), cglwd=0.8,
       vlcex=0.8)

更新：基于对答案的回答 如果您希望绘制区域的内部是彩色的而外部是白色，则可以添加内圆而不是外圆。

data <- data.frame(rbind(rep(8,14),
        rep(0,14),
        c(3,4,4,4,3,4,4,4,4,3,3,3,3,3),
        rep(2,14), rep(0,14)))

## Plot
radarchart(data, 
       axistype=1 ,
       pcol=c("#FF990088", NA,NA),
       pfcol=c("#FF990044","#FFFF0044","#FF000066"),
       plwd=4,
       cglcol="grey", 
       cglty=1, 
       axislabcol="grey", 
       caxislabels=seq(0,8,2), cglwd=0.8,
       vlcex=0.8)