置信区间在ggplot中延伸到零以下

Question

我的绘图中的置信区间超过了零，从而使y轴低于零。有什么方法可以在ggplot中进行调整，以使置信区间不会低于零，同时保持y轴限制不变？

Answer 1

使用set.seed(1) df <- data.frame(x = 1:100, y = pmax(0, 35 - 1:100 * runif(100) )) fit <- lm(y ~ x, data=df) pred_df <- data.frame(x=df$x, predict(fit, interval="confidence")) ggplot() + geom_point(aes(x=x, y=y), data=df) + geom_ribbon(aes(x=x, ymin=pmax(0,lwr), ymax=upr), alpha=0.5, data=pred_df) + scale_y_continuous(limits=c(min(pred_df$lwr), NA) ) ：

示例数据：

$db->query("UPDATE videos SET vkey = MD5(CONCAT(vkey, 'video'))");

Answer 2

您可以将此选项用于 y 轴（对于 x 轴也类似）：

scale_y_continuous(limits = c(min_y,max_y), oob=squish)