99999久久久久久亚洲,欧美人与禽猛交狂配,高清日韩av在线影院,一个人在线高清免费观看,啦啦啦在线视频免费观看www

熱線電話：13121318867

登錄

啊啊啊啊啊吖

2018-10-18 閱讀量: 1333

R里如何批量讀取json文件，幾行代碼就搞定

首先保證json數(shù)據(jù)文件都在當(dāng)前文件夾下

讀取json數(shù)據(jù)

library(jsonlite)#加載需要的包（安裝包需要先安裝好）

批量導(dǎo)入當(dāng)前文件夾下的所有文件

filelist <- list.files(pattern=".*.json")#列出當(dāng)前文件夾下所有的json數(shù)據(jù)文件名（每個(gè)文件名以.json結(jié)尾）
length(filelist)#文件個(gè)數(shù)
time1<-Sys.time()#當(dāng)前系統(tǒng)時(shí)間
datalist <- lapply(filelist, function(x) fromJSON(x)) #利用fromJSON函數(shù)按照文件名列表讀取文件
time2<-Sys.time()-time1;time2#計(jì)算讀取文件花費(fèi)的時(shí)間