R语言绘图:雷达图

使用fmsb包绘制雷达图

library("fmsb")
radarfig <- rbind(rep(90, 4), rep(60, 4), c(86.17, 73.96, 82.70, 69.55))     #求平均值
radarfig <- as.data.frame(radarfig)                                         #转化为data.frame
colnames(radarfig) <- c("服务方式\n完备度", "在线服务\n成熟度",
                          "办事指南\n准确度", "服务事项\n覆盖度")
radarchart(radarfig, axistype=1, pcol=rgb(91,155,213,155,maxColorValue = 255) ,
           pfcol=rgb(91,155,213,155,maxColorValue = 255) , plwd=4 ,
           cglcol="black", cglty=1, axislabcol="black", caxislabels=seq(60,90,5), 
           cglwd=1, vlcex=0.8 
)
posted @ 2017-12-17 20:43  嘻呵呵  阅读(7255)  评论(0编辑  收藏  举报