R語言怎么使用fmsb包畫雷達(dá)圖

喜歡看籃球的同學(xué)對(duì)這個(gè)圖肯定不會(huì)默認(rèn)，NBA或者CBA比賽直播的時(shí)候經(jīng)常會(huì)用雷達(dá)圖展示球員的個(gè)人數(shù)據(jù)，比如下面這個(gè)圖，展示的就是哈登的一個(gè)個(gè)人數(shù)據(jù)

 

多個(gè)圖放到一起也可以用來表示比較。比如在下面這個(gè)圖就可以很直觀的看出詹姆斯和哈登兩個(gè)人數(shù)據(jù)的差異

 

但這個(gè)雷達(dá)圖在學(xué)術(shù)論文里用的好像相對(duì)比較少。我個(gè)人覺得還挺適合展示不同個(gè)體之間一些指標(biāo)之間的比較的。比如不同品種的蘋果，測糖、酸、維生素、花青苷等等的含量，用這個(gè)雷達(dá)圖來展示就能夠很直觀的看出每個(gè)蘋果品種在哪些指標(biāo)占優(yōu)勢。

關(guān)注CBA的同學(xué)應(yīng)該看了昨天遼寧對(duì)廣東的比賽了吧，遼寧對(duì)的張公子獨(dú)砍46分率隊(duì)取得勝利，終止連敗。今天的推文就用雷達(dá)圖展示一下昨晚張公子的數(shù)據(jù)

數(shù)據(jù)來源 http://cbadata.sports.sohu.com/players/matches/100024158

雷達(dá)圖需要準(zhǔn)備的數(shù)據(jù)格式如下

 

前兩行是數(shù)據(jù)的取值范圍 接下來是需要畫圖的數(shù)據(jù)，如果有多組，依次向下排列就好了

df<-read.table("clipboard",header=T,row.names = 1)

install.packages("fmsb")

library(fmsb)
radarchart(df)

 

主要就是更改線的類型顏色等等

radarchart(df,
           pcol = "#00AFBB",
           pfcol =  scales::alpha("#00AFBB", 0.5),
           plty = "solid",
           cglty = "solid",
           cglcol = "black",
           cglwd =0.5)

 

不知道如何用代碼往上添加圖片，導(dǎo)出pdf格式手動(dòng)往上加吧

library(fmsb)
radarchart(df)
library(Cairo)
cairo_pdf(file = "zhang.pdf",
          width = 5,
          height = 5,
          family = "STSong")
radarchart(df,
           pcol = "#00AFBB",
           pfcol =  scales::alpha("#00AFBB", 0.5),
           plty = "solid",
           cglty = "solid",
           cglcol = "black",
           cglwd =0.5)
dev.off()

 

這樣就做好了

如果是多個(gè)球員的數(shù)據(jù)放到一起畫用來比較也是可以的，多組數(shù)據(jù)可以參考鏈接 https://www.datanovia.com/en/blog/beautiful-radar-chart-in-r-using-fmsb-and-ggplot-packages/ 最終效果