以5个变量(即雷达图的5个坐标轴,如表现方面学习能力,工作能力,工作态度,社交能力,团队协作等等)数据为例,
第一步:设置各个变量的取值范围(即最小值和最大值,相当于二维图的x轴和y轴的取值范围),代码如下
maxmin<-data.frame(学习能力=c(50,0),工作能力=c(50,0),工作态度=c(50,0),社交能力=c(50,0),团队协作=c(50,0))
第二步:设置准备绘图的指标类型的数据,如某人某方面的占有率
fengze<-data.frame(学习能力=40,工作能力=40,工作态度=45,社交能力=40,团队协作=36)
#第三步:把数据集 maxmin 和fengze 组合成为新的数据集,命名为fengzesAdtAndDisadt
fengzesAdtAndDisadt<-rbind(maxmin,fengze)
第四步: 绘图
#如何没有安装套件的话,请先安装fmsb套件,代码为 install.packages(‘fmsb’)
#注意安装包要求Rstudio版本为3.5.2
library(fmsb)
radarchart(丰泽个人优缺点雷达图,axistype=0,seg=4,centerzero=TRUE)
#seg的取值表示将各轴分成几段,centerzero表示蜘蛛网图中心点为最小值点,axistype为0表示不绘制各坐标轴标签
#然后,在 Plots栏→Export→Metafile→Copy Plot→粘贴到PowerPoint中进行编辑后,另存为 .tiff或.jpg文件就OK了,保存格式可选。
效果图:
|
请发表评论