Sim*_*ard 4 r data-modeling ggplot2
我试图表明我正在分析的一些数据中有一个奇怪的"颠簸"(它与市场份额有关.我的代码在这里: -
qplot(Share, Rate, data = Dataset3, geom=c("point", "smooth"))
Run Code Online (Sandbox Code Playgroud)
(我很欣赏没有数据集这不是非常有用的代码).
无论如何,我可以得到用于从R生成平滑线的数值向量?我只需要该层来尝试将模型拟合到平滑数据.
任何帮助感激不尽.
就在这里.ggplot使用该函数loess
作为默认的平滑器geom_smooth
.这意味着您可以loess
直接使用来估计平滑参数.
这是一个例子,改编自?loess
:
qplot(speed, dist, data=cars, geom="smooth")
Run Code Online (Sandbox Code Playgroud)
使用loess
估计平滑数据,并predict
为估计值::
cars.lo <- loess(dist ~ speed, cars)
pc <- predict(cars.lo, data.frame(speed = seq(4, 25, 1)), se = TRUE)
Run Code Online (Sandbox Code Playgroud)
现在估计数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()
Run Code Online (Sandbox Code Playgroud)