在 R 中将 PNG 文件旋转 90 度的最简单方法

【问题标题】：easiest way to rotate a PNG file 90 degrees within R在 R 中将 PNG 文件旋转 90 度的最简单方法
【发布时间】：2017-12-11 13:22:26
【问题描述】：

在我的计算机上以编程方式打开 PNG 文件，将其旋转 90 度，然后将其另存为另一个 PNG 文件的最轻松的方法是什么 - 没有质量损失，也没有其他更改？这是 microsoft paint 中的五秒钟任务，但所有相关 SO 问题的绘图、光栅、图像、设备答案让我对最简单的方法感到困惑？谢谢

【问题讨论】：

标签： r image png raster

【解决方案1】：

试用包magick：

library(magick)
newlogo <- image_read("https://www.r-project.org/logo/Rlogo.png")
newlogo <- image_scale(newlogo, "400x400") # logo is too big

# rotate
image_rotate(newlogo, 90)

# save    
image_rotate(newlogo, 45) %>% image_write("newlogoRotated.png")

我认为这是最简单的方法！

【讨论】：

呃...为什么是规模？这将产生不同的图像
原来的logo是800x700，对于RStudio查看器来说有点大，只是做demo用的

【解决方案2】：

也可以使用 Bioconductor 包EBImage，如下例所示。

library(EBImage)

# open
img <- readImage("https://www.r-project.org/logo/Rlogo.png")

# rotate
img <- rotate(img, 90)

# save    
writeImage(img, "Rlogo.png")

【讨论】：