[英]3D plot tick labels do not match with axis values (R lattice)
我正在使用以下代碼創建 3D plot。
plot 看起來幾乎完全符合我的要求。 唯一的問題是x和y軸的刻度標簽並不反映 x 和 y 向量的取值范圍,而是對應於各自向量中的元素個數。 有趣的是,盡管 z 取決於 x 和 y,但 z 軸的取值范圍是正確的。
我想要獲得的是 plot ,其中 x 和 y 軸有四個刻度線,其值范圍在 0 和 1 之間,就像基礎向量的值一樣。
任何幫助是極大的贊賞。
transfmv1 <- function (x, y) {
return (log(1/((x+y)*x)+1))
}
x <- seq(0.1, 1, len=20)
y <- x
z1 <- outer(x, y, transfmv1)
require(lattice)
require(graphics)
wireframe(z1,
xlab=list(label="Source country", cex=0.8),
ylab=list(label="Destination\n country", cex=0.8),
zlab=list(label="Multiplication\n factor", cex=0.8),
screen=list(z=-40, x=-60, y=0),
scales=list(arrows=F),
colorkey=F,
drape=T, col.regions=gray.colors(1000, start = 0.3, end = 0.9, gamma = 2.2, rev = FALSE))
您可以將定義網格的 x / y 值指定為row.values
和column.values
arguments(參見?wireframe.matrix
),所以只需添加
wireframe(z1,
# ...
row.values = x, column.values = y)
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.