r - 有没有办法旋转 visreg 包中的 x 轴标签？

Question

*** 编辑 **** 想通了：scales = list(rot = 90)

我正在使用 visreg() 函数绘制一个比较年份之间鸟类重量的线性模型。我有三个不同的物种，所以图表非常拥挤。我想旋转 x 轴标签，使它们垂直，但我不知道该怎么做。我las = 2在很多地方都用过，没有用。帮助将不胜感激！谢谢你。

 visreg(hawk_lm1, xvar = "Year", by = "Species", whitespace = 0.4, las = 2,
       points.par = list(cex = 0.5, col = "grey")) 

目前的图表截图

Answer 1

根据 visreg 包的文档，如果您使用 by=参数，则绘图是使用 lattice 包制作的。在 Lattice 中，您可以使用scales=旁边的参数rot()来旋转轴，只需将参数包含在 visreg 函数中作为附加参数，它就可以完成这项工作。我从空气质量数据集中创建了这个例子来说明。

library(visreg)
airquality$Heat <- cut(airquality$Temp, 3, labels=c("Cool", "Mild", "Hot"))
fit <- lm(Ozone ~ Solar.R + Wind + Heat, data=airquality)

##default  x axis labels
visreg(fit, "Wind", by="Heat",  bty="n", ylab="Ozone")

##rotated x  axis labels
visreg(fit, "Wind", by="Heat",  bty="n", ylab="Ozone", scales=list(x=list(rot=90)))