网站自己可以备案吗石家庄城市建设投资中心网站

一元回归分析

一、 Fitting Linear Models——lm函数
lm用于拟合线性模型，包括多元模型。它可用于进行回归、单层方差分析和协方差分
析。
命令格式： lm(formula, data, subset, weights …)
formula: 要拟合的模型的符号描述。
data: 包含模型中变量的可选数据帧、列表或环境。
subset:一个可选的矢量，指定拟合过程中使用的观测值子集。
weights：在拟合过程中使用的可选权重向量。
EG.

#输入数据
x<-c(3.4 ,1.8 ,4.6 , 2.3 ,3.1 ,5.5 ,0.7 ,3.0,2.6,4.3,2.1 ,1.1,6.1,4.8 ,3.8)
y<-c(26.2,17.8,31.3,23.1,27.5,36.0,14.1,22.3,19.6,31.3,24.0,17.3,43.2 ,36.4 ,26.1 )

#绘制样本散点图
level <- data.frame(x,y) #建立数据框
plot(level) （plot(x,y)） #直接利用数据

#拟合模型并作回归直线
lm.reg<-lm(y~1+x)
abline(lm.reg)

lm.reg

anova(lm.reg) #拟合优度

summary(lm.reg) #统计检验,显示详细结果

#拟合模型并作回归直线
cor.test(x, y) #计算检验

得距消防站离与损失的相关系数为0.960977，检验的p值为1.248e-08， 95%置信区间为[0.8837722，0.9872459]

#画残差图
plot(x,lm.reg$residuals)

#置信区间
confint(lm.reg,level=0.95)

#区间预测
newdata<-data.frame(x=2)
lm.pred<-predict(lm.reg,newdata,interval = “prediction”,level = 0.95)
lm.pred