根据经验， 在人的身高相等的情况下， 血压的收缩 Y 与体重 X1（千克）和年龄 X2（岁数）有关，现收集了 13 个男子
的数据，试建立 Y 关于 X1、X2 的线性回归方程。

参考答案： 第一步、录入数据，建立多元线性数据模型 X1<-c(76.0,91.5,85.5,82.5,79.0,80.5,74.5,79.0,85.0,76.5,82. 0,95.0,92.5) X2<-c(50,20,20,30,30,50,60,50,40,55,40,40,20) Y<-c(120,141,124,126,117,125,123,125,132,123,132,155,147) blood<-data.frame(X1,X2,Y) lm.sol<-lm(Y~1+X1+X2,data=blood) summary(lm.sol) 得出 Call: lm(formula=Y~X1+X2,data=blood) Residuals: Min1QMedian3QMax -4.0404-1.01830.46400.69084.3274 Coefficients: EstimateStd.ErrortvaluePr(>|t|) (Intercept)-62.96 33616.99976-3.7040.004083** X12.13 6560.1753412.1852.53e-07*** X20.40 0220.083214.8100.000713*** --- Signif.codes:0‘*** ’0.001 ‘** ’0.01 ‘* ’0.05 ‘. ’0.1 ‘’1 Residualstandarderror:2.854on10degreesoffreedom MultipleR-squared:0.9461,AdjustedR-squared:0.9354 F-statistic:87.84on2and10DF,pvalue:4.531e-0