我的代码是百度的，然后看到论坛上也有用同样代码出现不同报错的人，但是没解决我的问题，所以我再来问问……
我的代码是这样的
temp<-list.files(pattern=".*.json")
datalist<-lapply(temp,function(x) fromJSON(x))

Error in fromJSON(x)：unexpected character 'P'

求大神帮助！