moyen le plus simple pour faire pivoter un fichier PNG 90 degrés dans R

Question

quelle est la manière la plus simple d'ouvrir un fichier PNG par programme sur mon ordinateur, le faire pivoter de 90 degrés, puis l'enregistrer comme un autre fichier PNG - sans perte de qualité et sans autre changements? c'est une tâche de cinq secondes dans la peinture de Microsoft, mais toutes les réponses de trame, raster, image, appareil à des questions SO connexes me confondre sur la façon la plus simple de le faire? grâce

Answer 1

package Essayez 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") 

Je pense que c'est la meilleure façon!

Answer 2

Il est également possible d'utiliser le package Bioconductor EBImage, comme dans l'exemple suivant.

library(EBImage) 

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

# rotate 
img <- rotate(img, 90) 

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