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

Question

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

Answer 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")

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

Answer 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")