在ggplot2中添加加权最小平方趋势线

我正在使用ggplot2准备一个图，我想添加一个基于加权最小二乘估计的趋势线。在ggplot2中添加加权最小平方趋势线

在基地的图形，这可以通过发送一个WLS模型做abline：

mod0 <- lm(ds$dMNP~ds$MNP) 
mod1 <- lm(ds$dMNP~ds$MNP, weights = ds$Asset) 

symbols(ds$dMNP~ds$MNP, circles=ds$r, inches=0.35) 
#abline(mod0) 
abline(mod1)

在GGPLOT2我设定的参数weight在geom_smooth但没有任何变化：

ggplot(ds, aes(x=MNP, y=dMNP, size=Asset) + 
    geom_point(shape=21) + 
    geom_smooth(method = "lm", weight="Asset", color="black", show.legend = FALSE)

这给了我同样的阴谋作为

ggplot(ds, aes(x=MNP, y=dMNP, size=Asset) + 
    geom_point(shape=21) + 
    geom_smooth(method = "lm", color="black", show.legend = FALSE)

来源

2017-02-28 Majid Einian

您可以将此调整为内置数据集以获得重现性吗？ –

你可以在'aes'中放置'weight'，'geom_smooth'将使用它 –

我来晚了，但对子孙后代和清晰度，这里是完整的解决方案：

ggplot(ds, aes(x = MNP, y = dMNP, size = Asset) + 
    geom_point(shape = 21) + 
    geom_smooth(method = "lm", mapping = aes(weight = Asset), 
       color = "black", show.legend = FALSE)

不要把重量在引号。

来源

2017-11-16 21:08:52 everetr

在ggplot2中添加加权最小平方趋势线

回答

相关问题