在水平图上拉伸轴

Question

我想以水平图的形式绘制一些heightprofile-data。我的问题是，网格单元的大小不均相同。 例如，我有这个测试矩阵：

test <- c(1,2,3,4,5,6.5,8.5,12) 
testmatrix <- matrix(c(sample(0:10, 72, replace = TRUE)),nrow = 8, ncol = 8)
colnames(testmatrix) <- test
rownames(testmatrix) <- c(1:8)

这些列代表高度级别，从5以上开始，它们之间的间隔较长。 我想在绘图中也显示它，到目前为止所有刻度线都具有相同的距离。 有没有一种优雅的方法可以做到这一点？

levelplot(testmatrix,
          scales=list(x=list(at= seq(1, dim(testmatrix)[2], by=1)),
                      y= list(at= seq(1, dim(testmatrix)[1], by=1))
          )
)