如何使用rmarkdown / html修剪图片？

Question

我想在我的降价文档中包含一张网络图片，但我只想要图片的左侧部分。我搜索了如何用rmarkdown修剪图片，但我一无所获......

这是一个例子

{{1}}

给了我这个HTML输出。

如果我想修剪图例（约20％的右边部分），我该怎么办？

我接受任何类型的答案：相对或绝对规范，rmarkdown或html解决方案，......

谢谢！

Answer 1

您可以使用：

library(magick)
crop <- function(im, left = 0, top = 0, right = 0, bottom = 0) {
  d <- dim(im[[1]]); w <- d[2]; h <- d[3]
  image_crop(im, glue::glue("{w-left-right}x{h-top-bottom}+{left}+{top}"))
}
"http://ggplot2.tidyverse.org/README-example-1.png" %>%
  image_read() %>%
  crop(right = 210)

Answer 2

感谢@ hrbrmstr评论，我找到了解决方案。

library(magick)
library(magrittr)
image_read("http://ggplot2.tidyverse.org/README-example-1.png") %>% 
  image_flop() %>% 
  image_crop("1344x960+250") %>% 
  image_flop()

我不确定这两个image_flop()函数效率最高，而且我不能理解"1344x960+250"，但它有效：）