今天進(jìn)行了體能測(cè)試，然后對(duì)一些測(cè)試指標(biāo)進(jìn)行了評(píng)分，最后得到了一個(gè)評(píng)分表和一個(gè)雷達(dá)圖，如下（請(qǐng)自動(dòng)忽略渣渣的肺活量，體前屈和臺(tái)階指數(shù)）：
然后看到這個(gè)雷達(dá)圖就閑著無(wú)聊想在R上做一下（其實(shí)很簡(jiǎn)單）
那啥叫雷達(dá)圖呢嚣潜，還是自己百度吧。
首先呢我想到的是王者農(nóng)藥里邊的那個(gè)雷達(dá)圖椅贱，王者農(nóng)藥會(huì)對(duì)近100場(chǎng)的對(duì)戰(zhàn)統(tǒng)計(jì)繪制雷達(dá)圖懂算，一般看別人這個(gè)圖的話基本就能猜到他經(jīng)常玩什么位置只冻，好比下邊的幾位：
1、萬(wàn)年肉盾類：可以看出這名玩家相對(duì)于其他生存的屬性很高计技，死的很少喜德，輸出推塔等屬性值很低，可以猜測(cè)該玩家經(jīng)常是選打不死的肉盾（魚）或者是奶媽（蔡蔡）等輔助類英雄垮媒。
2舍悯、這位玩家相比上一位除了生存比較高還有一個(gè)就是推進(jìn)，可以猜測(cè)該玩家經(jīng)常是打的上單戰(zhàn)士位（老夫子）+輔助類
3睡雇、下面這位玩家可以說(shuō)是各項(xiàng)數(shù)據(jù)比較均衡萌衬，幾乎各個(gè)位置都有在打，但是KDA很高它抱，可以猜測(cè)一下可能打的比較猥瑣秕豫，集推塔、輸出观蓄、發(fā)育混移、參團(tuán)、生存于一身侮穿，偶爾收個(gè)殘血歌径、搶個(gè)人頭、混個(gè)助攻撮珠、少浪KDA就上去啦。(*^▽^*)
4金矛、這位玩家的話整體跟上面的數(shù)據(jù)相似芯急，但是KDA相對(duì)于上一位較小，說(shuō)明不夠猥瑣驶俊。
上邊呢只是自己根據(jù)玩家的雷達(dá)圖進(jìn)行簡(jiǎn)單的分析娶耍，實(shí)際結(jié)果不一定準(zhǔn)確。接下來(lái)進(jìn)入正題饼酿，如何繪制雷達(dá)圖榕酒，以自己體測(cè)的結(jié)果作為輸入。
R中畫雷達(dá)圖也有很多的包故俐，今天用到的是 fmsb 包中的 radarchart 函數(shù)想鹰。
# 1，安裝并載入 fmsb 包
install.packages("fmsb")
library(fmsb)
# 2药版，準(zhǔn)備數(shù)據(jù)辑舷， 輸入數(shù)據(jù)為 dataframe 格式，
# 并且如果提供最大值最小值的話槽片， 第一行必須是最大值何缓，第二行必須是最小值肢础，第三 行以后是我們待分析的數(shù)據(jù)
# 拿最近做的一次體測(cè)結(jié)果作為展示
# 最高分，最低分碌廓，及自己得分結(jié)果
max_min = matrix(c(rep(5,9),rep(0,9)),nrow =2,byrow = T) # 總共9項(xiàng)传轰，最高分5分，最低分0分
item = c("身高標(biāo)準(zhǔn)體重","俯臥撐","縱跳","握力","反應(yīng)時(shí)","單腳站立","臺(tái)階指數(shù)","肺活量","體前屈")
max_min = data.frame(max_min) # 轉(zhuǎn)成數(shù)據(jù)框
colnames(max_min) = item # 添加列名
score = c(5,5,4,3,4,5,1,2,2) # 錄入得分
mydata = rbind(max_min,score) # 生成dataframe
rownames(mydata) = c("maxscore","minscore","myscore") # 改行名（無(wú)所謂）
radarchart(mydata,axistype = 5) # 軸標(biāo)簽及類型谷婆，0:5可選慨蛙，（默認(rèn) 0）0：沒(méi)有軸標(biāo)簽 ；1：僅標(biāo)中心部分 波材； 2： 僅標(biāo)四周 股淡；3：既標(biāo)中心又標(biāo)四周 ；4：同1廷区，不過(guò)用小數(shù)顯示 唯灵；5：同3 小數(shù)顯示
# 可以看下 選擇 0 -5 時(shí)的區(qū)別
par(mfrow = c(2,3))
for (i in 0:5){
? radarchart(mydata,axistype =i )
}
3、接下來(lái)是一些其他的參數(shù)（可通過(guò)?radarchart 查看幫助文件）
axistype ：軸標(biāo)簽及類型隙轻，0:5可選埠帕，（默認(rèn) 0）0：沒(méi)有軸標(biāo)簽 1：僅標(biāo)中心 2： 僅標(biāo)四周 3：既標(biāo)中心又標(biāo)四周 4：同1，小數(shù)顯示 5：同3 小數(shù)顯示
seg ：? segment 分成幾個(gè)圈?
pty ： point type 玖绿，點(diǎn)的形狀敛瓷，默認(rèn) 16 黑點(diǎn)，32：不顯示點(diǎn)
pcol： 樣本顏色 斑匪，默認(rèn)1:8呐籽，循環(huán)使用
plty ：線的形狀，默認(rèn)1:6蚀瘸，循環(huán)使用?
plwd ：線的粗細(xì)狡蝶，默認(rèn)1
cglty ： 雷達(dá)圖網(wǎng)格線類型，默認(rèn) ：3（虛線） 贮勃； 1 贪惹，實(shí)線
cglwd ： 雷達(dá)圖網(wǎng)格線粗度
cglcol ： 雷達(dá)圖網(wǎng)格線顏色， 默認(rèn)：navy
axislabcol ：標(biāo)簽顏色
title : 標(biāo)題
vlcex ：軸 name 的字體大小縮放比例
calcex ：軸中心字體大小縮放比例
palcex ：軸四周字體大小縮放比例
4寂嘉、最后附上最終結(jié)果圖（與體測(cè)報(bào)告中的圖形狀是一樣的奏瞬，不過(guò)我的順序跟他不大一樣）
radarchart(mydata,axistype =2,seg=5,pty=32,plty=1,plwd = 2,
? ? ? ? ? cglty = 1,cglcol = "grey",axislabcol = "red",title = "體能測(cè)試",
? ? ? ? ? vlcex = 0.9,calcex = 0.9,palcex = 1.1)
上面的結(jié)果看出，我的心肺功能（肺活量和臺(tái)階指數(shù)）和身體柔韌性（體前屈）相對(duì)于其他來(lái)說(shuō)比較低泉孩，其他的還好還好硼端。
下面附上一張報(bào)告評(píng)估，跟自己看的差不多寓搬。
