如何在水平图中反转y轴标签的顺序？

Question

我想将y轴（“行”）的标签从减少（从上到下）更改为增加（从上到下），以正确匹配绘制的值。这应该对任何y轴标签（自动）进行，而不仅仅是手动定义y轴上的值（换句话说，我如何在y轴上抓取使用过的标签，反转它们的顺序然后把它们作为标签放回来？panel.levelplot（）怎么样？）。此外，这应该在不使用其他包的情况下完成。

library(lattice)
A <- outer(1:100, 1:100, FUN = function(x, y) (x+2*y)/300)
levelplot(t(A)[, nrow(A):1], xlab = "Column", ylab = "Row")

这个想法是在视觉上匹配矩阵的结构（从左上角到右下角的对角线）。感谢。

Answer 1

只需设置ylim=c(100,1)或更好，ylim=c(100.5,0.5)：

## Prepare figures with and without inverted y-axes, for easy comparison 
a <- levelplot(t(A)[, nrow(A):1], xlab = "Column", ylab = "Row")
b <- levelplot(t(A)[, nrow(A):1], xlab = "Column", ylab = "Row", 
          ylim=c(100.5, 0.5))

## Plot figs side-by-side to confirm that this works
library(gridExtra)
grid.arrange(a, b, ncol=2)