r - 从 ggplot2 中获取向量

Question

我试图表明我正在分析的一些数据中有一个奇怪的“颠簸”(这与市场份额有关。我的代码在这里:-

qplot(Share, Rate, data = Dataset3, geom=c("point", "smooth"))

(我很欣赏没有数据集这不是非常有用的代码)。

无论如何，我可以获得用于从 R 中生成平滑线的数字向量吗？我只需要该层来尝试将模型拟合到平滑数据。

感激地收到任何帮助。

Answer 1

就在这里。 ggplot 使用函数 loess作为 geom_smooth 中的默认平滑器.这意味着您可以使用 loess直接估计您的平滑参数。

这是一个例子，改编自 ?loess :

qplot(speed, dist, data=cars, geom="smooth")

使用 loess估计平滑数据，和 predict对于估计值:

cars.lo <- loess(dist ~ speed, cars)
pc <- predict(cars.lo, data.frame(speed = seq(4, 25, 1)), se = TRUE)

估计现在在 pc$fit和 pc$fit.se 中的标准错误.以下代码将拟合值提取到 data.frame 中，然后使用 ggplot 绘制它:

pc_df <- data.frame(
    x=4:25,
    fit=pc$fit)

ggplot(pc_df, aes(x=x, y=fit)) + geom_line()