R中的数据导入与导出

#导入csv文件
data1 <- read.table("1.csv", header=TRUE, sep=",", fileEncoding="UTF-8", stringsAsFactors=FALSE);

data2 <- read.csv("2.txt", header=TRUE, sep=",");

#不带表头
data2 <- read.csv("2.txt", header=FALSE, sep=",", col.names=c("age", "name"));

data3 <- read.csv("3.xxx", header=FALSE, sep=",");

#指定分隔符
data3 <- read.csv("3.xxx", header=FALSE, sep="\t")

age <- c(22, 23);
name <- c('KEN', 'John');
cname <- c("小明", "小刚");

f <- data.frame(age, name, cname, stringsAsFactors = FALSE);

write.table(f, file='f.csv', sep=',', fileEncoding = "UTF-8")
#去除行号
write.table(f, file='f.csv', sep=',', fileEncoding = "UTF-8", row.names=FALSE)
#去除列名
write.table(f, file='f.csv', sep=',', fileEncoding = "UTF-8", row.names=FALSE, col.names=FALSE)
#去除引号
write.table(f, file='f.csv', sep=',', fileEncoding = "UTF-8", 
            quote = FALSE, row.names=FALSE, col.names=FALSE)