在R中绘制Effect图时如何旋转X轴标签？

我太懂你折腾好几个小时找不到办法的烦躁了，这就给你两个精准的解决方案，完美适配你用Effect()生成的效应对象：

方法1：直接用plot.eff的lattice参数旋转标签 #

你之前用par(las=2)没效果的核心原因是：Effect对象的绘图底层用的是lattice包的绘图系统，不是base R那套！所以base R的par()参数完全不生效，得用lattice专属的scales参数来控制轴标签：

# 生成效应对象（你的原有代码不变）
kiri.eff <- Effect(c("words", "otherwords"), kiri)
# 绘图时添加scales参数，直接旋转X轴标签（rot=90是垂直旋转）
plot(kiri.eff, multiline = T, ci.style = "bars", 
     scales = list(x = list(rot = 90)))

如果觉得标签对齐不太舒服，还可以调整垂直/水平对齐度：

scales = list(x = list(rot = 90, vjust = 0.5, hjust = 1))

方法2：转成数据框用ggplot2绘图（更灵活） #

要是你更喜欢ggplot2的自定义风格，只需要把Effect对象转成普通数据框，就能用ggplot的常规操作控制轴标签了：

library(ggplot2)
# 把效应对象转换成标准数据框
eff_df <- as.data.frame(kiri.eff)

# 用ggplot绘制效应图，同时设置X轴标签旋转
ggplot(eff_df, aes(x = words, y = fit, color = otherwords, group = otherwords)) +
  geom_line(linewidth = 1) +  # 绘制分组线条
  geom_point(size = 2) +      # 添加数据点
  geom_errorbar(aes(ymin = lower, ymax = upper), width = 0.2) +  # 添加上下置信区间
  theme_classic() +  # 可选：更换简洁主题
  theme(
    axis.text.x = element_text(angle = 90, vjust = 0.5, hjust = 1)  # 旋转X轴标签并对齐
  )

这种方法能让你完全自定义绘图的颜色、字体、主题等元素，比lattice灵活得多~

说白了就是之前混淆了base R和lattice的绘图参数体系，换对参数就能轻松解决问题啦！

内容的提问来源于stack exchange，提问作者Kiritschu