楼主: brute
2045 2

[问答] 拟合线性模型,运行后得不出结果,帮忙看一下哪里不对 [推广有奖]

  • 0关注
  • 0粉丝

高中生

22%

还不是VIP/贵宾

-

威望
0
论坛币
435 个
通用积分
0
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
133 点
帖子
9
精华
0
在线时间
21 小时
注册时间
2005-5-25
最后登录
2015-6-6

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币

rm(list = ls())
n=1000
gy=read.delim("2013gdp.txt")
y=data.matrix(gy[2])
x=data.matrix(gy[1])

dataxy=cbind(x,x^2,x^3,x^4,x^5)
xy1=data.frame(dataxy)
names(xy1)
colnames(xy1)[2:5]=c("x2","x3","x4","x5")
lm1.fit=lm(y~.,data=xy1)
lm2.fit=step(lm1.fit,trace=0,k=log(n))
summary(lm2.fit)
extractAIC(lm2.fit,k=log(n))

###########################################
运行后是

Call:
lm(formula = y ~ 1, data = xy1)
Residuals:
      Min        1Q    Median        3Q       Max
-15411207 -10936113  -4568171   3225395  66004190
Coefficients:
            Estimate Std. Error t value Pr(>|t|)   
(Intercept) 17708165    3088041   5.734 2.94e-06 ***
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 17190000 on 30 degrees of freedom
> extractAIC(lm2.fit,k=log(n))
[1]    1.000 1038.814

#########################
系数总是出不来


二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:线性模型 coefficients coefficient Intercept Residuals 模型

沙发
nuomin 发表于 2015-5-8 19:19:23 |只看作者 |坛友微信交流群
formula = y ~ 1
对常数进行回归,没有包含其他解释变量

使用道具

藤椅
hugebear 发表于 2015-5-8 20:40:12 |只看作者 |坛友微信交流群
程序本身没有问题,step返回的只是选出的最优模型(用BIC准则,你的最优模型就是无自变量的模型)。
若想看到详细的筛选过程,不要赋值也不要设置trace的值,直接step(lm.fit1, k = log(n))就好。

使用道具

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-10-6 01:34