R：雷达图

#构建数据框，共3行，值分别为每一个变量的区间和真实值
> data<-data.frame("语文"=c(100,0,87),"数学"=c(100,0,92),"英语"=c(100,0,80),"体育"=c(100,0,72),"历史"=c(100,0,84),"化学"=c(100,0,95))
> data
  语文 数学 英语 体育 历史 化学
1  100  100  100  100  100  100
2    0    0    0    0    0    0
3   87   92   80   72   84   95

> library(fmsb)
> radarchart(
		   data,
           axistype=0,					#轴标签及类型,默认0:没有轴标签 1:仅标中心 2:仅标四周 3:既标中心又标四周 4:同1,小数显示 5:同3小数显示
		   seg=4,						#雷达圈数,默认值为4
		   pty=16,						#point type,,默认16黑点,32:不显示点
		   pcol=1,						#绘图数据的颜色代码矢量：默认1:8,重复使用
		   plty=1,						#绘图数据的线型矢量：默认值1:6,重复使用
		   plwd=1,						#绘图数据的线宽矢量：默认值1,重复使用
		   pdensity=NULL,				#填充多边形密度的向量：默认为NULL,重复使用
		   pangle=45,					#用做填充多边形的线条角度向量:默认为45,重复使用
		   pfcol=rgb(0.2,0.5,0.5,0.5),	#用于填充多边形的颜色代码矢量:默认NA,重复使用
		   cglty=3,						#雷达网格的线型:默认值3,表示虚线
		   cglwd=1,						#雷达网格的线宽:默认值为1,表示最细线
		   cglcol="grey",				#雷达网格的线条颜色:默认“navy”
		   axislabcol="grey",			#轴标签和数字的颜色:默认“蓝色”
		   title="成绩雷达图",			#标题
		   vlcex=0.8,					#轴name的字体缩放比例.若是为NULL,则字体大小固定为text()的默认值
		   calcex=0.8,					#轴中心字体缩放比例.若是为NULL,则字体大小固定为text()的默认值
		   palcex=0.8					#轴四周字体缩放比例.若是为NULL,则字体大小固定为text()的默认值
		   )