用R实现雷达图

R画图有很多包，其中可以利用R中自带的函数完成。

这里绘制雷达图的函数，依赖的包fmsb：

雷达图是展示多个项目在多个变量上的比较。

示例：

1、要求数据集的数据结构必须是dataframe。

2、传给雷达图函数的数据集，由三部分构成：第一行是最大值，第二行是最小值，后面是真正用于绘制雷达图的数据。可以用rbind函数构造。

3、绘图参数的解释，通过help查看。

#####构造最大值行和最小值行

方式一 直接构造

addMax = rep(a , ncol(data))    //a 可以为大于 max(data)的值

addMin = rep(b , ncol(data))    //b 可以为小于 min(data)的值

res = rbind(addMax,addMin,data)

方式二 用函数

addMaxMin = function (data）{

dataMax = rep（1,ncol(data)）

dataMin = rep（1,ncol(data)）

for (i in (1: ncol(data)))

dataMax[i] = max(data[,i])

dataMin[i] = min(data[,i])

res = rbind（dataMax,dataMin,data）

return(res)

}

#####绘制雷达图

res=addMaxMin(data)

radarchart(res,axistype =2,pcol = topo.colors(5),plty =1,title ="(axistype=2, pcol=topo.colors(5), plty=1)")