前往小程序,Get更优阅读体验!
立即前往
首页
学习
活动
专区
工具
TVP
发布
社区首页 >专栏 >R中的数据导入与导出

R中的数据导入与导出

作者头像
Erin
发布2018-01-09 16:36:07
2.3K0
发布2018-01-09 16:36:07
举报
文章被收录于专栏:大数据风控

1、数据的导入

导入文本文件

使用read.table函数导入普通文本文件

read.table(file,header=FALSE,sep="",...)

代码语言:javascript
复制
#导入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")

2、数据的导出

导出文本文件

write.table(x,file="",sep="",row.names=TRUE,col.names=TRUE,quote=TRUE)

代码语言:javascript
复制
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)
本文参与 腾讯云自媒体同步曝光计划,分享自作者个人站点/博客。
原始发表:2017年07月11日,如有侵权请联系 cloudcommunity@tencent.com 删除

本文分享自 作者个人站点/博客 前往查看

如有侵权,请联系 cloudcommunity@tencent.com 删除。

本文参与 腾讯云自媒体同步曝光计划  ,欢迎热爱写作的你一起参与!

评论
登录后参与评论
0 条评论
热度
最新
推荐阅读
目录
  • 1、数据的导入
  • 2、数据的导出
领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档