如何反转光栅图中的 y 轴?
How can I reverse the y-axis in a raster plot?
我想绘制一个 y 轴从上到下递增的栅格,栅格相应地翻转。有没有办法做到这一点?按降序指定 ylim
会出错。
例如,我希望此图的 y 轴 运行 从顶部的 -100 到底部的 100,栅格也反转为顶部绿色和底部橙色:
library(raster)
r <- raster(nrows=10, ncols=10)
r <- setValues(r, 1:ncell(r))
plot(r)
# Fails
plot(r, ylim=c(100, -100))
#> Error in .plotraster2(x, col = col, maxpixels = maxpixels, add = add, : invalid ylim
由 reprex package (v0.3.0)
于 2020-10-30 创建
下面显示的方法似乎有效
示例数据
library(raster)
r <- raster(nrows=10, ncols=10, vals=1:100)
垂直翻转光栅,并添加水平轴
plot(flip(r, "y"), axes=F)
axis(1)
获取纵轴的标签,并以相反的顺序绘制它们
ylabs <- axis(2, labels=FALSE, tick=FALSE)
axis(2, at=ylabs, labels=rev(ylabs))
我想绘制一个 y 轴从上到下递增的栅格,栅格相应地翻转。有没有办法做到这一点?按降序指定 ylim
会出错。
例如,我希望此图的 y 轴 运行 从顶部的 -100 到底部的 100,栅格也反转为顶部绿色和底部橙色:
library(raster)
r <- raster(nrows=10, ncols=10)
r <- setValues(r, 1:ncell(r))
plot(r)
# Fails
plot(r, ylim=c(100, -100))
#> Error in .plotraster2(x, col = col, maxpixels = maxpixels, add = add, : invalid ylim
由 reprex package (v0.3.0)
于 2020-10-30 创建下面显示的方法似乎有效
示例数据
library(raster)
r <- raster(nrows=10, ncols=10, vals=1:100)
垂直翻转光栅,并添加水平轴
plot(flip(r, "y"), axes=F)
axis(1)
获取纵轴的标签,并以相反的顺序绘制它们
ylabs <- axis(2, labels=FALSE, tick=FALSE)
axis(2, at=ylabs, labels=rev(ylabs))