其他
不等宽条形图
今天在逛github时发现了一个不等宽条形图：
这个图形让人觉得耳目一新，用条形的宽度来展示变量的大小，非常有新意！
如果你对ggplot2足够熟悉，应该大致能猜出来这个图形是用什么函数画出来的。没错，就是geom_rect。只要提供四条边的坐标就能画出来了。
我把画此图代码的地址放在这里[1]，有兴趣的可以去观摩下代码，尤其是数据清洗部分，看看大佬是如何思考的。
如果你觉得过于复杂了，也可以自己编一段代码。
data <- data.frame(
group=c("A ","B ","C ","D ") ,
value=c(33,62,56,67) ,
number_of_obs=c(100,500,459,342)
)
data$right <- cumsum(data$number_of_obs) + 30*c(0:(nrow(data)-1))
data$left <- data$right - data$number_of_obs
ggplot(data, aes(ymin = 0)) +
geom_rect(aes(xmin = left, xmax = right, ymax = value, colour = group, fill = group)) +
xlab("number of obs") +
ylab("value") +
theme_ipsum() +
theme(legend.position="none")
参考资料
不等宽条形图: https://github.com/fi-lees/tidy_tuesday/tree/master/2022/TT_2022_W9_AlternativeFuelStations
以上就是今天的内容，希望对你有帮助哦！欢迎点赞、在看、关注、转发！
欢迎在评论区留言或直接添加我的微信！
欢迎关注公众号：医学和生信笔记
“医学和生信笔记 公众号主要分享：1.医学小知识、肛肠科小知识；2.R语言和Python相关的数据分析、可视化、机器学习等；3.生物信息学学习资料和自己的学习笔记！
往期回顾
lasso回归结果美化
可视化可爱的小蜜蜂
画一个好看的桑基图？
通过数据看上海疫情
画一幅更好看的杠铃图！