對(duì)于導(dǎo)出帶有透明度的高清圖，小仙又發(fā)現(xiàn)了更懶的辦法，特來(lái)更新

再Rstudio里調(diào)整好透明度之后，直接導(dǎo)出pdf，然后用Adobe illustrator打開(kāi)pdf文件，直接導(dǎo)出png或jpeg就可以啦

更新前原文

今天小仙同學(xué)給大家分享下Radar chart的作圖方法，其實(shí)雷達(dá)圖我們?cè)谏钪心芙?jīng)常可以見(jiàn)到，比如大家很喜歡玩的王者榮耀里就有。通過(guò)簡(jiǎn)單的圖形對(duì)比，人物特點(diǎn)一目了然。

也經(jīng)常用來(lái)評(píng)估學(xué)生的成績(jī)和產(chǎn)品的性能。

在生信領(lǐng)域，我們也可以用來(lái)比較評(píng)估樣品的基因表達(dá)情況啦。

作圖數(shù)據(jù)如下：

畫(huà)出來(lái)的效果圖如下：

作圖方法：

Step1. 繪圖數(shù)據(jù)的準(zhǔn)備

首先還是要把你想要繪圖的數(shù)據(jù)調(diào)整成R語(yǔ)言可以識(shí)別的格式excel中保存成csv格式。數(shù)據(jù)的格式就在上面啦。

Step2. 繪圖數(shù)據(jù)的讀取

data<-read.csv(“your file path”, header = T)

Step3.繪圖所需package的安裝、調(diào)用

install.packages("fmsb")
library(fmsb)

Step4.繪圖數(shù)據(jù)格式調(diào)整

radarfig<-rbind(rep(15,10),rep(0,10),data)

#在原有的數(shù)據(jù)上增加了兩行，
#第一、二行分別是每個(gè)縱軸的最大值、最小值，也可手動(dòng)添加

Step5.繪圖

radarchart(radarfig, axistype=1,
            pcol=rgb(69/255,137/255,137/255) , pfcol=rgb(69/255,137/255,137/255,0.6),    
            plwd=4 ,seg=5,
            cglcol="grey", cglty=1, cglwd=2，axislabcol="black" ,caxislabels=seq(0,15,3),
            vlcex=0.7,calcex=0.7）

如果從RStudio直接導(dǎo)出png或者jpeg格式的圖片，還是會(huì)有之前小仙同學(xué)提過(guò)的**“鋸齒狀”線條**。之前的解決方案是導(dǎo)出eps格式，在Adobe Illustrator里打開(kāi)再導(dǎo)出成需要的格式。但本小仙發(fā)現(xiàn)一個(gè)“巨坑”，就是RStudio導(dǎo)出的eps圖形沒(méi)有透明度，需要在AI里手動(dòng)調(diào)整透明圖。
（其實(shí)R代碼的這一部分本小仙很快就寫(xiě)好了 ，調(diào)整填充透明度費(fèi)了老大勁，實(shí)名diss此bug）

填充透明度調(diào)整方法如下：

1.取消編組

2.選中線條，對(duì)象—實(shí)時(shí)上色—建立

3.選中線條，對(duì)象—拓展

4.更改填充顏色，輸入相應(yīng)顏色RGB數(shù)值

5.刪掉圖形白色背景

6.外觀—填色—不透明度—調(diào)整數(shù)值