我有下面的代码来旋转图像。但是旋转的图像具有不同的尺寸。我们怎样才能确保旋转的图像具有相同的尺寸？
即。如果原始图像有50行和30列，则旋转的图像应该有30行和50列。
library(raster)
r1 <- brick("watch1.JPG")#please use any jpg image
plotRGB(r1)
png("SaveThisPlot.png")
plotRGB(t(flip(r1, 2)))
dev.off()
答案 0 :(得分：1)
png("SaveThisPlot.png",width=nrow(r1),height=ncol(r1))