#分享 ggplot2推薦圖形配置

2020年12月17日 20:27
前情提要
===============目錄============== -theme主題設定 -可用主題theme_XXX() -圖形配色 -更改字體配置 -更改字型 - extrafont -更改字體大小 - ggeasy ================================= ggplot2繪製的圖形非常漂亮 但若是要應用在正式一點的報告中還是會建議進行微調 今天就來分享幾個我喜歡的配置 純屬個人喜好沒有絕對的優劣 首先先安裝與載入這次會介紹的套件 ============= R Code ============= #install.packages("ggsci") #安裝套件 #install.packages("ggeasy") #install.packages("extrafont") library(ggplot2) library(ggsci) # 修改配色 library(ggeasy) # 修改字體配置 ================================= 🌟🌟theme主題設定 ggplot2預設是淡灰色背景 ggplot2內建theme_XXX系列函數可以用於修改主題 默認theme_gray() ============= R Code ============= p1 <- ggplot(data = diamonds, mapping = aes(x = price, y = carat, colour = clarity)) + #設定資料集與映射資料 geom_point() p1 =================================
🌟 可用主題theme_XXX()
可以添加theme_bw()或是theme_light()修改主題 theme_bw()或theme_light()個人覺得比較適合做為論文使用 ============= R Code ============= p2 <- ggplot(data = diamonds, mapping = aes(x = price, y = carat, colour = clarity)) + #設定資料集與映射資料 geom_point() + theme_bw() #修改主題 p2 =================================
============= R Code ============= p2_1 <- ggplot(data = diamonds, mapping = aes(x = price, y = carat, colour = clarity)) + #設定資料集與映射資料 geom_point() + theme_light() #修改主題 p2_1 =================================
🌟🌟 圖形配色 修改完主題再來介紹一個配色的套件 ==ggsci== ggsci提供了一組ggplot2受科學期刊,數據可視化,科幻電影和電視節目啟發的調色板 其中非常喜歡她其中的UCSCGB配色 使用方式也十分簡單只需要加上`scale_color_ucscgb()` 或`scale_fill_ucscgb()` ============= R Code ============= p3 <- ggplot(data = diamonds, mapping = aes(x = price, y = carat, colour = clarity)) + #設定資料集與映射資料 geom_point() + theme_bw() + scale_color_ucscgb() #使用ucscgb配色 p3 =================================
============= R Code ============= p4 <- ggplot(data = diamonds,mapping = aes(x = color)) + #設定資料集與映射資料 geom_bar(aes(group = cut,fill = cut)) + scale_fill_ucscgb() +#使用ucscgb填充配色 theme_bw() + ggtitle("p4") #增加圖片標題 p4 =================================
🌟🌟更改字體配置 ### 更改字型 - extrafont ============= R Code ============= #首次使用執行程式碼載入字體庫 #需等待五分鐘左右 font_import() loadfonts(device = "win") ================================= ============= R Code ============= p5 <- p4 + ggtitle("p5") + theme(text=element_text(family = "Times New Roman")) #修改字體 p5 =================================
🌟🌟 更改字體大小 - ggeasy 最後看到XY軸的字體有點小 這邊可以使用ggeasy的套件進行修改 ============= R Code ============= p6 <- p5 + ggtitle("p6") + easy_x_axis_title_size(16) + easy_y_axis_title_size(16) p6 =================================
到這邊大致上就是我會對ggplot2圖片的修改 更類似於我會在Sigmaplot所畫的圖片 最後總結一個今天使用到的程式碼 ============= R Code ============= #install.packages("ggsci") #配色套件 #install.packages("ggeasy") #快速修改文字設定 #install.packages("extrafont") #使用電腦字形 library(ggplot2) library(ggeasy) library(ggsci) library(extrafont) #font_import() #載入字形 #loadfonts(device = "win") p <- ggplot() p + scale_fill_ucscgb() +#使用ucscgb填充配色 #scale_color_ucscgb() theme_bw() + #更改主題 theme(text=element_text(family = "Times New Roman")) + #修改字體 easy_x_axis_title_size(16) + #更改XY軸字體大小 easy_y_axis_title_size(16) =============================== 🌟全文可以至下方連結觀看或是補充
全文分享至
有疑問想討論的都歡迎於下方留言 喜歡的幫我分享給所有的朋友 \o/ 有所錯誤歡迎指教 全部文章列表
25
回應 2
文章資訊
共 2 則留言
通報 📢 好像有人對這篇文章有新想法唷,快來去看看!