R：格子Plots/Wireframe：标签的图形问题

Question

我有一个关于线框的一些图形选项的问题。我怎样才能使 xlab 和 ylab 平行于立方体 - 它们在我的图中看起来很糟糕，看看我的其他 post

。

Answer 1

您可以将列表传递给 wireframe 的 zlab、xlab 和 ylab 参数。这些列表的一个组成部分可以是 rot，它以度为单位指定轴标签应旋转的量。到目前为止，我只能通过反复试验 "align" 带有轴的标签。

## Code from your other post, to make this reproducible
model_test <- lm(Sepal.Length ~( Petal.Length + Sepal.Width + Petal.Width +Species)^2,
    data=iris)
gg<-expand.grid(Petal.Length=0:6,Species=levels(iris$Species))
vv<-expand.grid(Sepal.Width=0:4,Petal.Width=1:4)

pd<-do.call(rbind,Map(function(Petal.Length,Species,Sepal.Width,Petal.Width){
              nd <- cbind(vv, Petal.Length=Petal.Length,Species=Species,
                               Sepal.Width=Sepal.Width, Petal.Width=Petal.Width)
              cbind(nd, pred=predict(model_test, nd, type="response"))},
              Petal.Length=iris$Petal.Length,Species=iris$Species,
               Sepal.Width=iris$Sepal.Width,Petal.Width=iris$Petal.Width))

## Plot with rotated axis labels
wireframe(pred~Sepal.Width+Petal.Width|Species*Petal.Length,
           pd, drape=FALSE,scale=list(arrows=FALSE),subset=(Species=="setosa"),
           layout = c(3, 3), zlab = list("pred", rot = 90),
           xlab = list("Sepal.Width", rot = 30),
           ylab = list("Petal.Width", rot = -30))

R：格子Plots/Wireframe：标签的图形问题

R: Lattice Plots/Wireframe : Graphical Issues with labels

r

lattice