- 1、本文档共26页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
商务统计例题代码
商务数据分析与应用
第1章 线性回归
移动通信网络的客户价值分析
*指标设计
Y相对利润变化
X1通话总量
X2大网占比
X3小网占比
#读入数据,以数据为第一行data1=read.csv(F:/1商务统计/案例数据/第1章.csv,header=T)names(data1)=c(Y,X1,X2,X3)data1[c(1:3),]
## Y X1 X2 X3## 1 0.2126197 2.822822 0.9037594 0## 2 0.2756156 2.628389 0.9717647 0## 3 0.1687526 2.537819 0.9913043 0*描述分析
N=sapply(data1,length)#样本量MU=sapply(data1,mean)#均值SD=sapply(data1,sd)#标准差MIN=sapply(data1,min)#最小值MED=sapply(data1,median)#中位数MAX=sapply(data1,max)#最大值result=cbind(N,MU,SD,MIN,MED,MAX)result
## N MU SD MIN MED MAX## Y 1123 0.1930176 0.1324444 -00.1870535 0.9925818## X1 1123 2.5804381 0.4083604 02.5831988 3.6009729## X2 1123 0.8457207 0.1538765 00.8983452 1.0000000## X3 1123 0.2521307 0.2112832 00.1983730 0.9734904
*最小二乘估计
lm1=lm(Y~X1+X2+X3,data=data1)lm1
## Call:## lm(formula = Y ~ X1 + X2 + X3, data = data1)## Coefficients:## (Intercept) X1 X2 X3 ## -0.488566 0.235569 0.089486 -0.007807
*方差分析
anova(lm1)
## Analysis of Variance Table## Response: Y## Df Sum Sq Mean Sq F value Pr(F) ## X1 1 10.7177 10.7177 1375.7807 2.2e-16 ***## X2 1 0.2448 0.2448 31.4279 2.606e-08 ***## X3 1 0.0017 0.0017 0.2216 0.638 ## Residuals 1119 8.7173 0.0078 ## Signif. codes: 0 *** 0.001 ** 0.01 * 0.05 . 0.1 1
*参数估计
summary(lm1)
## Call:## lm(formula = Y ~ X1 + X2 + X3, data = data1)## Residuals:## Min 1Q Median 3Q Max ## -0.62789 -0.04540 -0.01281 0.03177 0.62598 ## Coefficients:## Estimate Std. Error t value Pr(|t|) ## (Intercept) -0.488566 0.026160 -18.676 2e-16 ***## X1 0.235569 0.006519 36.135 2e-16 ***## X2 0.089486 0.022915 3.905 9.98e-05 ***## X3 -0.007807 0.016586 -0.471 0.638 ## Signif.
文档评论(0)