图表因ylim限制显示不全，求无缩放完整显示解决方法

问题说明 #

y轴应设置为0-5的范围，但因天花板效应和地板效应，当前图表部分内容显示异常（见截图），需要在不改变缩放比例的前提下实现完整显示。

核心原因 #

你当前使用的ylim()函数会直接裁剪超出范围的数据点，导致部分本应显示的内容被移除，这就是显示异常的根源。而coord_cartesian()函数仅调整绘图的显示范围，不会删除数据，能完美满足“不改变缩放比例”的需求。

解决步骤 #

• 移除代码中的ylim(c(-0.5,5.5))，替换为coord_cartesian(ylim = c(0, 5))，锁定y轴显示范围为0-5
• 保留clip = "off"参数，避免图表边缘的元素被裁剪
• 调整代码顺序，让coord_cartesian()在主题设置之前生效，防止被覆盖

修改后的完整代码 #

# 数据可视化检查
fit <- Anxiety_full
# 绘制模型图
plot_Anxiety <- plot_model(fit, type = "eff", terms = c("Condition", "Group")) +
  coord_cartesian(xlim = c(0.5, NA), ylim = c(0, 5), clip = "off") +  # 替换ylim，锁定显示范围
  theme_tq() +
  scale_colour_tq() +
  scale_fill_tq(light) +
  labs(
    title = "",
    y = "焦虑评分 [0-5]",
    x = ""
  ) +
  xlim(c("baseline", "60 bpm", "16 bpm", "10 bpm", "6 bpm", "random")) +
  ggplot2::labs(colour = "组别") +
  scale_color_manual(values = c('Red','Black')) +
  theme_apa()  # 合并主题设置，简化代码

plot_Anxiety

额外说明 #

• coord_cartesian()的作用是“取景”，只改变可见范围，所有数据点都会被保留，不会丢失任何因天花板/地板效应产生的极值点
• 如果仍有边缘元素被遮挡，可通过theme(plot.margin = margin(10, 10, 10, 10))调整图表边距，数值可根据实际情况修改

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