查看原文
其他

医师节快乐!

Y叔叔 YuLabSMU 2022-09-23

今天的朋友圈,上面这张图高频出现,做为一个节日,怎么少得了画图祝贺一下。这可是我们的保留节目!

首先嘛,当然是要安装或更新biobabble包。

remotes::install_github("GuangchuangYu/biobabble")

有了这个包,数据就有了,画图的函数也有了。

实例演示

不出意外,我们先要加载包:

library(biobabble)

然后要加载数据,也就是画图需要的一个数据框:

data(doctor)

最后当然是出图了,用一个bplot函数画出来:

bplot(doctor) +
  ggplot2::ggtitle("2020\n中国医师节快乐!")

这里我给图加多个标题,有图有真相,整个过程截屏如下:

最后出的图,是这样子的,一个穿着防护服,带着护目镜的医生,向医生们致敬。

电梯直达 -> 更多有趣的图等你发现

您可能也对以下帖子感兴趣

文章有问题?点此查看未经处理的缓存