- data.table包中fread函数比readr包的函数读取更快,但是目前只能支持windows上的gbk编码与UTF-8编码
library(data.table)
timestart<-Sys.time()
x <- fread("D://data/vod/vod_month_201707.txt",sep = "\001",header = F,stringsAsFactors = F,encoding = "UTF-8",data.table = T)
timeend<-Sys.time()
runningtime<-timeend-timestart
print(runningtime)
#Time difference of 4.058793 secs
#结果显示消耗4秒
library(readr)
timestart <- Sys.time()
y <- read_delim("D://data/vod/vod_month_201707.txt",delim = "\001")
timeend <- Sys.time()
runningtime2 <- timeend-timestart
print(runningtime2)
#结果显示消耗Time difference of 5.136311 secs
x7 <- fread(input = paste("order_", year, month, ".txt", sep = ""),sep = "|",header = F,stringsAsFactors = F,data.table = T,encoding = "UTF-8",colClasses = c("numeric","character","character","character","character","character","character","character","character"))
colnames(x7) = c("city_id","userid","date","time","product_id","status","product_name","id","order_path")
R语言fread和read_delim读取数据
最后编辑于 :
©著作权归作者所有,转载或内容合作请联系作者
- 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
- 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
- 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
推荐阅读更多精彩内容
- 注: 这次分享是我在处理sav格式数据时总结,方法来源于网络。 引言 R读取spss数据中sav格式的数据,通常有...
- R语言不是中国人开发的,自然对中文的处理上没有特别考虑,但是我们依然可以处理。 下面我给出了解决方案。但我想,别的...