R语言读写最灵活的文件——txt文件

Python021

R语言读写最灵活的文件——txt文件,第1张

原文链接

R语言可以读取很多文件,其中以txt文本文件最为灵活,为什么呢,txt文件可以以任意符号作为分隔符,比如“,”,“\t”,空格,甚至`“……&¥¥%¥”`等任意自定义的分隔符号。

这里先把工作空间切换到D盘下面,默认的一般是C盘的文档,我们要有分层管理文件的概念,否则我们还是一个合格的程序员吗?

>setwd('D:\\')

读取文本文件主要用read.table(filePath,header = ,sep=)

filePath就是文件路径,header表示文件是否有头部,我这个文件没有头部,值就为false,sep表示文件是以什么符号作为分隔符号。

头部是什么意思呢?

现在这里有4个文件,分别以空格,逗号,制表符,“/”作为分隔符,下面分别将其读取:

>dat <- read.table('1.txt',header = FALSE,sep = ' ')

>dat2 <- read.table('2.txt',header = FALSE,sep = ',')

>dat3 <- read.table('3.txt',header = FALSE,sep = '\t')

>dat4 <- read.table('4.txt',header = FALSE,sep = '/')

读取出来的数据都是一样的:

因为第二个文件是以逗号作为分隔符,所以也是可以用read.csv()读取的,read.csv()也是一个读取文件函数,后面会讲到。

把刚才读取的数据写入到一个新的文本文件里面,可以用write.table(),形式为:

write.table(dat,file = ,sep = ,row.names,col.names)

分别表示,

dat:被写的数据,

file:文件名(包含路径),

sep:分隔符,

row.names:是否有行名(比如第一行,第二行。。)就是行名,

col.names:是否有列名,同上,

当然了,一般行名与列名需要取有实际意义的名字,比如列名可以取(年龄、性别、成绩,这种表格相信大家应该都见过吧!)。

这里分别用" ","aaa","\t"作为分隔符,生成了3个文件。

>write.table(dat,file = '5.txt',sep = ' ')

>write.table(dat,file = '6.txt',sep = 'aaa')

>write.table(dat,file = '7.txt',sep = '\t')

这样就保存了三个文件。当然了,你可以保存成任意你喜欢、需要的分隔符号。

原文链接: 原文链接

杀杀

前两天一个同学问了一个批量读数据(文件)的问题

感觉现在分析测序数据的话,在R中一次性读取多个文件的功能还是挺需要用到的

决定总结一下下

总不能写n行read.csv…balabala…去读取,那太麻烦了

于是决定使用批量读数据

首先我们要获取这个文件夹里所有的文件名字以便读取

接下来我们需要构建读文件的路径

ps: 在做这种批量操作时还是有必要先花时间测试一个样本是否能够成功,然后再去做批量的循环,这样也能方便自己找bug

因此我们先试着读取一个文件

这里因为例子中的文件格式比较特殊,所以使用的读取函数是read.delim,如果是.csv或.txt等格式,也可以替换成read.csv, read.table等函数。

好了测试通过,接下来开始批量读文件

需要注意的是,合并文件的时候,需要注意你是要取所有文件中行名的交集还是并集,或者最后你是否有一个统一的行名来规整所有文件。(当然如果你确定每个文件的行名都是相同的,就可以直接cbind),我遇到过需要取交集的情况,可以写一个循环对每个文件的行名做交集,用最终的交集文件去match出所有你要的行然后合并。

但是这个例子中,有的文件的行名是1-4000,有的是5000-8000,存在非常大的差异,而需求是最后整合成一个行名为0-8000的矩阵,因此我先建立一个0-8000的列作为行名,把每个文件和这列进行一个match操作,然后未match到的填充为0。

其实没有很难的部分,主要是需要读取文件夹中的所有文件名,然后循环读取就行了。

dll文件是编译好的,不再存在源代码了。不过R语言是开源的,如果要阅读源代码,要专门去下载R语言的源代码。

比如

http://cran.cnr.berkeley.edu/src/base/R-3/R-3.3.2.tar.gz