你好，我编写的C10.1的R语言如下:
data=read.table("./raw/intdef.raw",header=F,na.string=".")
#data[,]
dum<-numeric(length(data[,1]))#create one vector with the samelenth of data[,1]
for( i in 1948:2003 ){
   if( i <= 1979 ){
       dum[i-1947]<-0
   }
   else {
       dum[i-1947]<-1
   }
}
lm.reg<-lm(data[,2]~data[,3]+data[,6]+dum)#adding dummy variable dum
summary(lm.reg)
============
用data[,]显示读入数据,可以得到很多列的数据,但各列数据对应的变量名不知道,我尝试将read.table中的header=T,也不能显示
还有,我直接用excel打开intdef.xls,也不见各列数据对应的变量名,见附件,
题目告知回归模型为
i3_t=alpha0+beta1*inf_t+beta2*def_t+beta3*dum
其中i3_t, inf_t, def_t需要从文件intdef.xls读取,可是打开intdef.xls文件,有多列数据,怎么知道哪列对应的是i3_t,inf_t,def_t.也就是我程序中data[,2],data[,3],data[,6],为了找到这个对应,我特意到网上搜美国通胀,财政赤字等数据才确定的...好费劲啊

这样为了知道哪列数据对应的变量是inf等,需要耗费大量时间,

> BARIUM <- read.dta("BARIUM.DTA")
警告信息：
In read.dta("BARIUM.DTA") : cannot read factor labels from Stata 5 files
> names(BARIUM)
[1] "chnimp"   "bchlimp"  "befile6"  "affile6"  "afdec6"   "befile12" "affile12"
[8] "afdec12"  "chempi"   "gas"      "rtwex"    "spr"      "sum"      "fall"   
[15] "lchnimp"  "lgas"     "lrtwex"   "lchempi"  "t"        "feb"      "mar"     
[22] "apr"      "may"      "jun"      "jul"      "aug"      "sep"      "oct"     
[29] "nov"      "dec"      "percchn"

这不都有吗
下载dta格式数据

https://bbs.pinggu.org/thread-2515088-1-1.html

谢谢，是我太笨了
我是r新人，多多指教^^