

webpea现代化的图片保存方案

R语言数据分析指南

2023-03-02

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

❝
本节来介绍如何一款R包「webpea」,该款R包主要用与以webp格式将图片的保存，相对于png格式可以在「不降低图片质量的情况下大大压缩文件的大小」，尤其适用与「Rmarkdown」文件可以在缩短文档图片加载的时间。详细内容请参考作者官方文档，在此通过两个案例来进行介绍。
❞

官方文档

❝
https://github.com/nucleic-acid/webpea
❞

2023-VIP购买方式

❝
有需要购买2023年文档的朋友欢迎到小编的「淘宝店铺」 「R语言数据分析指南」下单购买，微信发小编订单截图即可邀请进新的交流群，小编的文档为按年售卖，只包含当年度的「除系列课程外」的文档，有需要往年文档的朋友也可下单购买，需要了解更多信息的朋友欢迎交流咨询，「添加小编微信请备注，以提高沟通效率」
❞

淘宝店铺个性化绘图服务

❝
有需要找小编做个性化绘图的朋友欢关注「淘宝店铺(R语言数据分析指南)」 有需求者可咨询下单。
❞

加载R包

install.packages("remotes")
remotes::install_github("nucleic-acid/webpea")
library(webpea)
library(tidyverse)

案例

❝
diamonds数据集包含数据量众多因此在数据保存时会非常的耗费时间，因此在此使用webp的格式保存会在不降低图片质量的情况下大大压缩文件大小。
❞

p <- ggplot(diamonds) +aes(price, carat, color = as.factor(cut)) +
  geom_point(alpha = 0.5, size = 3) +theme_light()

图片保存

webpea(p,file="plot.webp", device = "png",dpi = "retina",quality =100)
ggsave(p,file="plot.png",dpi=300)

自动化导出HTML图片

❝
在使用Rmarkdown制作文档时，有时过多的图片导出也会耗费众多的时间，因此使用webp格式可以大大缩短文档加载的时间。
❞

# {r pressure, echo=FALSE}
library(tidyverse)
library(webpea)
p <- ggplot(diamonds) +
  aes(price, carat, color = as.factor(cut)) +
  geom_point(alpha = 0.5, size = 3) +
  theme_light()

htmltools::img(
  src = webpea("chunk1.webp", plot = p, height = 6,width = 8,
               path_return = FALSE),width = "100%")