查看原文
其他

野猪通缉画像

Y叔叔 biobabble 2020-02-05

在《博士养成记》里我放了两张野猪的照片来记载港大医学院的生活,我第一次见过野猪是有一次在实验室加班到半夜,然后走路回宿舍,走着走着,迎面走来一只动物,我以为是只流浪狗,直到走到很近的时候,我艹,有獠牙!是野猪!竟然大摇大摆在公路上走!当我假装淡定走了几步后,拿出手机抓拍它的背影时,已经拍得不清晰了。后来在湾景看到过,再后来在去数码港的路上也看到过。

野猪在香港也算不上什么新闻了:

但是在港大这几年,第一次收到学校关于野猪的邮件,因为野猪攻击人了!

据朋友圈报料,好像惨不忍睹:


p = ggplot(d, aes(x, y)) + geom_point(size=.8) +
 scale_y_reverse() + xlab(NULL) + ylab(NULL) +
 geom_image(image="http://guangchuangyu.github.io/blog_images/biobabble.jpg", x=550, y=-550, size=.1, asp=1.5) +
    labs(title="港大野猪通缉画像"
         subtitle="生态环境太好的校园,有时也是蛮囧的!") +
    labs(caption="学ggplot2画图\n请扫码关注公众号\nbiobabble") + 
    theme(plot.title=element_text(family="STHeiti"),
        plot.subtitle=element_text(family="STHeiti"),
        plot.caption=element_text(family="STHeiti", hjust=0)) + coord_equal(clip="off"

往期精彩

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

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