如何解决如何只绘制图样或ggplot2中的残差?
如果我只想绘制残差,我可以做
plot(model$residuals)
,我将得到一个不错的散点图。如何在ggplot2或plotly中执行相同的操作? 我不想绘制残油vs拟合值。
谢谢, 阿迪
解决方法
也许是这样吗?
model <- lm(Sepal.Width ~ Petal.Length,data = iris)
ggplot(data.frame(x = seq(model$residuals),y = model$residuals)) +
geom_point(aes(x,y)) +
labs(x = "Index",y = "Residuals",title = paste("Residuals of",format(model$call)))
比以下哪个更好:
plot(model$residuals)
,
类似于@AllanCameron,您可以使用broom
包,该包还提供有关模型结果的其他选项(df
中的变量):
library(ggplot2)
library(broom)
#Data
data("iris")
#Model
m1 <- lm(Sepal.Length~Sepal.Width,data=iris)
df <- augment(m1)
ggplot(df,aes(x = 1:nrow(df),y = .resid)) + geom_point() + xlab('x')
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。