祝大家 2020 新年快乐!

祝大家 2020 新年快乐!

Happy 2020 ~
今天是今年的最后一天了,感谢大家的支持,希望新的一年里大家继续一起学习,一起进步!

代码:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
library(ggplot2)
library(ggimage)
library(cowplot)
ggplot() +
geom_text(aes(x = 5, y = 5), label = "Happy 2020!",
size = 20, family = "SentyZHAO") +
geom_text(aes(x = 6, y = 3.2), label = "TidyFriday",
size = 10, family = "SentyZHAO") +
scale_y_continuous(limits = c(1.5, 7.5)) +
scale_x_continuous(limits = c(1.5, 8)) +
theme_nothing() -> p
img <- "joanna-kosinska-dka5C8Ct2Fw-unsplash.jpg"
ggdraw() +
draw_image(img) +
draw_plot(p) +
draw_image("icon.png",
scale = 0.12, x = 0.016, y = -0.21)

知识星球附件链接:https://t.zsxq.com/aYB66Yz

#

评论

Your browser is out-of-date!

Update your browser to view this website correctly. Update my browser now

×