昨天看到的一份資料疮装，介紹的是ggplot2畫柱形圖并且使用指定的字體，我感覺最終成圖的配色還挺好看的，記錄在這里。總共6個顏色值蚊俺，分別是
c("#02B1e6", "#E81D22", "#F9BC15", "#8015f9", "#20e81d", "#e64602")懈涛，參考資料的鏈接是 https://rstats-tips.net/2019/08/31/custom-fonts-in-ggplot2-and-latex/
首先用柱形圖展示一下這個顏色的效果
代碼
col<-c("#02B1e6", "#E81D22", "#F9BC15", "#8015f9", "#20e81d", "#e64602")
df<-data.frame(x=LETTERS[1:6],
y=6,
label=c("#02B1e6", "#E81D22", "#F9BC15", "#8015f9", "#20e81d", "#e64602"))
library(ggplot2)
ggplot(df,aes(x=x,y=y))+
geom_col(aes(fill=x),show.legend = FALSE)+
geom_label(aes(label=label))+
scale_fill_manual(values = col)+
theme_void()
看起來還不錯吧逛万！
開頭提到的鏈接里還提到了如何使用指定的字體，這里可以參考一下B站的視頻教程 https://www.bilibili.com/video/BV1ke411p7B4 這個里面提到的解決辦法是 借助
extrafont這個R包批钠，通過這個包中的font_import()函數(shù)將將操作系統(tǒng)中所有的字體導(dǎo)入宇植，第一次使用時間可能會有點長。導(dǎo)入結(jié)束后就可以使用fonts()函數(shù)查看導(dǎo)入字體的名稱埋心。font_import()函數(shù)還可以導(dǎo)入指定路徑下的字體
我的R語言里目前可以使用的字體如下
R語言ggplot2畫圖如果要更改圖片整體的字體可以使用theme()函數(shù)設(shè)置text參數(shù)
library(ggplot2)
library(Cairo)
p<-ggplot(df,aes(x=x,y=y))+
geom_col(aes(fill=x),show.legend = FALSE)+
geom_label(aes(label=label),family="Times New Roman")+
scale_fill_manual(values = col)+
theme_bw()+
theme(text = element_text(family = "Times New Roman",
size=20))
ggsave("Rplot01.pdf",p,device = cairo_pdf)
這里我遇到一個問題是 從系統(tǒng)里導(dǎo)入的字體可以使用指郁，但是從指定目錄導(dǎo)入的字體還不能使用，暫時不知道是什么原因
歡迎大家關(guān)注我的公眾號
小明的數(shù)據(jù)分析筆記本
小明的數(shù)據(jù)分析筆記本 公眾號 主要分享：1拷呆、R語言和python做數(shù)據(jù)分析和數(shù)據(jù)可視化的簡單小例子闲坎；2疫粥、園藝植物相關(guān)轉(zhuǎn)錄組學(xué)、基因組學(xué)腰懂、群體遺傳學(xué)文獻閱讀筆記梗逮！
