對于導出帶有透明度的高清圖，小仙又發(fā)現了更懶的辦法，特來更新

再Rstudio里調整好透明度之后，直接導出pdf，然后用Adobe illustrator打開pdf文件，直接導出png或jpeg就可以啦

更新前原文

今天小仙同學給大家分享下Radar chart的作圖方法，其實雷達圖我們在生活中能經?？梢砸姷剑热绱蠹液芟矚g玩的王者榮耀里就有。通過簡單的圖形對比，人物特點一目了然。

也經常用來評估學生的成績和產品的性能。

在生信領域，我們也可以用來比較評估樣品的基因表達情況啦。

作圖數據如下：

畫出來的效果圖如下：

作圖方法：

Step1. 繪圖數據的準備

首先還是要把你想要繪圖的數據調整成R語言可以識別的格式excel中保存成csv格式。數據的格式就在上面啦。

Step2. 繪圖數據的讀取

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

Step3.繪圖所需package的安裝、調用

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

Step4.繪圖數據格式調整

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

#在原有的數據上增加了兩行，
#第一、二行分別是每個縱軸的最大值、最小值，也可手動添加

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直接導出png或者jpeg格式的圖片，還是會有之前小仙同學提過的**“鋸齒狀”線條**。之前的解決方案是導出eps格式，在Adobe Illustrator里打開再導出成需要的格式。但本小仙發(fā)現一個“巨坑”，就是RStudio導出的eps圖形沒有透明度，需要在AI里手動調整透明圖。
（其實R代碼的這一部分本小仙很快就寫好了 ，調整填充透明度費了老大勁，實名diss此bug）

填充透明度調整方法如下：

1.取消編組

2.選中線條，對象—實時上色—建立

3.選中線條，對象—拓展

4.更改填充顏色，輸入相應顏色RGB數值

5.刪掉圖形白色背景

6.外觀—填色—不透明度—調整數值

(⊙o⊙)，小仙同學也覺得這種方法有點麻煩，不過目前沒有找到更好的方法啦
（據說excel也可以畫雷達圖，嫌麻煩的同學可以移步excel啦，能又快又好畫出圖就是好方法）
今天的分享就到這里啦，更多關于R語言繪制Radar chart的資料請關注腳本之家其它相關文章！

最新評論