全部版块 我的主页
论坛 数据科学与人工智能 数据分析与数据科学 R语言论坛
2791 16
2011-11-16
悬赏 5 个论坛币 未解决
1.用file.choose( )来选择导入文件,但一次只能导入一个,倘若文件一多,就很繁琐了,请问,有没有函数命令一次导入多个文件或干脆导入整个文件夹所有文件?

2.用rbind纵连各变量,比如rbind(b,c),但我想在各变量之间插入空行或NA,目的就是区分开各个合并的变量,比如这个样子:
     B1  46005.87  10005.82  310.2439
     B2  2491.086  3761.511  50.66
     B3  9658.181  418.4822  30.97375
     B4  22237.71  8357.524  286.0386
     B5  21770.28  3655.325  32.17997
     NA NA NA NA
     C1  45920.88  10553.36  262.7236
     C2  2489.57  3441.273  35.5
     C3  9844.962  426.84  24.08885
     C4  23014.08  8191.37  251.3761
     C5  22547.89  4258.929  36.14817

该怎么做呢?
二维码

扫码加我 拉你入群

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

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

全部回复
2011-11-16 11:43:24
1.

a<-list.files()
for (x in a) {
    dat <- read.table(x)
    ...
}
二维码

扫码加我 拉你入群

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

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

2011-11-16 11:47:08
2.

> a <- 1:10
> b <- 2:11
> rbind(a, NA, b)
  [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
a    1    2    3    4    5    6    7    8    9    10
    NA   NA   NA   NA   NA   NA   NA   NA   NA    NA
b    2    3    4    5    6    7    8    9   10    11
二维码

扫码加我 拉你入群

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

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

2011-11-16 14:09:40
qoiqpwqr 发表于 2011-11-16 11:43
1.

a
额,不太明白,我在weekdata这个文件夹里有7天的文件,monday.txt,tuesday.txt,···sunday.txt,想一次性读入,分别这7个文件的数据赋予给7个变量,还是从monday,tuesday到sunday好了,不知该怎么写,我是这么写的,但运行不成功:
a<-list.files("weekdata");a
for (x in a) {
    monday <- read.table(monday.txt)
    tuesday<- read.table(tuesday.txt)
    wednesday<- read.table(wednesday.txt)
    thursday<- read.table(thursday.txt)
    friday<- read.table(friday.txt)
    saturday<- read.table(saturday.txt)
    sunday<- read.table(sunday.txt)
}
二维码

扫码加我 拉你入群

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

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

2011-11-16 18:01:11
第一个问题吧,已经讨论了N次了,可以找找以前的帖子
第二个问题吧,不知道楼主的最终目的是什么,感觉这种操作比较怪
二维码

扫码加我 拉你入群

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

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

2011-11-16 22:42:55
Davidhust 发表于 2011-11-16 14:09
额,不太明白,我在weekdata这个文件夹里有7天的文件,monday.txt,tuesday.txt,···sunday.txt,想一 ...
如果不多的话,你直接读入就好了
    monday <- read.table(monday.txt)
    tuesday<- read.table(tuesday.txt)
    wednesday<- read.table(wednesday.txt)
    thursday<- read.table(thursday.txt)
    friday<- read.table(friday.txt)
    saturday<- read.table(saturday.txt)
    sunday<- read.table(sunday.txt)
二维码

扫码加我 拉你入群

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

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

点击查看更多内容…
相关推荐
栏目导航
热门文章
推荐文章

说点什么

分享

扫码加好友,拉您进群
各岗位、行业、专业交流群