生信技能树 Day5 文件读写

# read.系列函数
# read.table() 读取txt格式
# read.delim() 读取txt格式,比table少报错
# read.csv() 读取csv格式

#1.读取ex1.txt
ex1 <- read.table("ex1.txt") # 列名变成了表格的正式内容，数值列因列名的加入变成了字符
ex1 <- read.table("ex1.txt",header = T) # 文件有列名的话让列名归位

#2.读取ex2.csv
ex2 <- read.csv("ex2.csv") # 行名当成了第一列并加了列名x；列名中_特殊字符被转化为.
ex2 <- read.csv("ex2.csv",row.names = 1,check.names = F) # 设置第一列为行名；不自动检查列名
## 注意行名不能重复，如果报错可以把去除重复值（两行求平均合并）

write.csv(ex2,file = "example.csv")
write.table(ex2,file = "example.txt") # 写文件名的时候把后缀带上

#用data.table来读取
library(data.table)

ex1 = fread("ex1.txt")
class(ex1)

## [1] "data.table" "data.frame"

ex1 = fread("ex1.txt",data.table = F)
class(ex1)

## [1] "data.frame"

ex2 = fread("ex2.csv",data.table = F)
##不支持直接设置行名，设置行名用下面函数实现
library(tibble)
ex2 = column_to_rownames(ex2,"V1") # 把V1列设为行名

#rio
library(rio)
#一个函数支持读取很多格式，见帮助文档
ex1 = import("ex1.txt") ### 最推荐的函数
#一个函数支持导出很多格式，见帮助文档
export(ex1,file = "ex1.xlsx")