大数跨境
0
0

ggplot2优雅绘制半边箱线图

ggplot2优雅绘制半边箱线图 R语言数据分析指南
2024-04-27
2

欢迎关注R语言数据分析指南

本节来回答读者的一个问题,如何半边箱线图主要通过「gghalves」包来实现对此感兴趣的读者可以查阅官方文档,数据为随意构建无实际意义,整个过程仅参考。希望对各位观众老爷能有所帮助。「数据代码已经整合上传到学习交流群」,购买过小编R数据可视化文档的朋友可在所加的交流群内获取下载,有需要的朋友可关注文末介绍加入交流群。

gghalves官方文档

https://erocoar.github.io/gghalves/

结果图

图形主要通过一边展示箱图一边通过散点来展示数据分布,并添加了组间显著性标记。

关注下方公众号下回更新不迷路

有需要学习R数据可视化的读者,欢迎购买小编的R数据可视化案例文档,「购买将自动获得2024年及以后更新的绘图文档代码,无需额外付费」。目前会员文档(2023+2024)「已经更新上传了150+案例文档」,每个案例都附有相应的数据和代码,并配有对应的注释文档,方便大家学习和参考。有需要的朋友欢迎到小编的「淘宝店铺-R语言数据分析指南」下单购买。

「2024更新的绘图内容同时包含数据+代码+markdown注释文档+文档清单」

注:2022版与2023版文档为单独售卖,买任意一年的都可获取2024的文档,小编只分享案例文档不额外回答问题。

淘宝店铺

加载R包

library(tidyverse)
library(gghalves)
library(rstatix)
library(ggpubr)
library(ggsci)

查看加载R包版本

sessionInfo()

导入数据

df <- read_tsv("data.xls") %>% 
  mutate(year=as.character(year))

数据可视化

df %>%
  ggplot(aes(year,lifeExp)) +
  geom_half_boxplot(aes(fill=year),color="black",
                    side="l",errorbar.draw = T
                    outlier.shape = NA, width=0.8) +            
  geom_half_point(aes(color=year),
  side = "r",
  transformation_params = list(height = 0,width = 0.001,seed = 2))+
  facet_wrap(.~continent,nrow=1)+ 
  scale_y_continuous(limits = c(0,95),breaks = seq(0,95,20))+
  scale_fill_npg()+
  scale_color_npg()+
  labs(x=NULL,y=NULL)+
  theme(plot.margin=unit(c(0.5,0.5,0.5,0.5),units=,"cm"),
        panel.background = element_blank(),
        plot.background = element_blank(),
        strip.text = element_text(size=12),
        axis.line = element_line(color = "black",size = 0.4),
        axis.text.y = element_text(color="black",size=10),
        axis.text.x = element_text(margin = margin(t = 2),color="black",size=10),
        legend.position = "none",
        panel.spacing = unit(0,"lines"))+
  coord_cartesian()

2024年已更新案例

【声明】内容源于网络
0
0
R语言数据分析指南
R语言重症爱好者,喜欢绘制各种精美的图表,喜欢的小伙伴可以关注我,跟我一起学习
内容 1180
粉丝 0
R语言数据分析指南 R语言重症爱好者,喜欢绘制各种精美的图表,喜欢的小伙伴可以关注我,跟我一起学习
总阅读64
粉丝0
内容1.2k