- library(jsonlite)
- #批量导入当前文件夹下的所有文件
- filelist <- list.files(pattern = ".*.json") # 列出当前文件夹下所有的json数据文件名(每个文件名以.json结尾)
- length(filelist) # 文件个数
- time1 <- Sys.time() # 当前系统时间
- datalist <- lapply(filelist, function(x) fromJSON(x)) # 利用fromJSON函数按照文件名列表读取文件
- time2<-Sys.time()-time1;time2#计算读取文件花费的时间
lexical error: invalid char in json text.
{Rows:[{"SimNum":"64959409512","
(right here) -----


雷达卡




京公网安备 11010802022788号







