R_Language 板


LINE

※ 引述《pp61022 (fight)》之铭言: : [问题类型]: : 程式谘询(我想用R 做某件事情,但是我不知道要怎麽用R 写出来) : [软体熟悉度]: : 请把以下不需要的部份删除 : 入门(写过其他程式,只是对语法不熟悉) : [问题叙述]: : 请简略描述你所要做的事情,或是这个程式的目的 : 我在kaggle看到一个dataset, : https://www.kaggle.com/roamresearch/prescriptionbasedprediction : 想要把他下载下来转成Rdata档, : 但是他是JSONL的格式,但好像也算是JSON格式?! : (网站说明:The file is in JSONL format (one JSON record per line)) : 有搜寻一些R读取JSON格式的方法, 但还是没办法出来, : 想请教版友们该如何修改才能正常读取这种格式的dataset : (我刚学R, 对於某些程式码还不熟, 不清楚应该如何debug) : [程式范例]: : 张贴能够重现错误的程式码,可以帮助版友更快的帮你解决问题 : http://ideone.com/PL9XJq : 读到CleanData<-do.call("rbind", person)出现warning message,但我不知道该如何修 : 正 : : Warning message: : In rbind(provider_variables = list(settlement_type = "non-urban", : : number of columns of result is not a multiple of vector length (arg 1) : [环境叙述]: : 请提供 sessionInfo() 的输出结果, : 里面含有所有你使用的作业系统、R 的版本和套件版本资讯, : 让版友更容易找出错误 : R version 3.2.3 (2015-12-10) : Platform: x86_64-w64-mingw32/x64 (64-bit) : Running under: Windows 7 x64 (build 7601) Service Pack 1 : locale: : [1] LC_COLLATE=Chinese (Traditional)_Taiwan.950 : [2] LC_CTYPE=Chinese (Traditional)_Taiwan.950 : [3] LC_MONETARY=Chinese (Traditional)_Taiwan.950 : [4] LC_NUMERIC=C : [5] LC_TIME=Chinese (Traditional)_Taiwan.950 : attached base packages: : [1] stats graphics grDevices utils datasets methods : [7] base : other attached packages: : [1] rjson_0.2.15 : loaded via a namespace (and not attached): : [1] tools_3.2.3 : [关键字]: : 选择性,也许未来有用 : 我有参考https://goo.gl/EEdGxP 这个网站的写法 试试看ndjson这个套件吧 他可以正确解析jsonl 并且速度也不慢,以下是测试code library(ndjson) jsonlFileName <- unzip("prescriptionbasedprediction.zip", list = TRUE)$Name unzip("prescriptionbasedprediction.zip") df <- stream_in(jsonlFileName) 用ndjson是目前看到最快的方法XDD ndjson是八月新出的套件... 玩一下觉得还不错XDD 而且这资料怎麽那麽大,吃掉我快10G的记忆体= =.... 读要好久,用readLines + sapply + fromJSON的时间超久... 久到完全不想等Orz 补充一点,ndjson读进来是data.table -- R资料整理套件系列文: magrittr #1LhSWhpH (R_Language) https://goo.gl/OBto1x data.table #1LhW7Tvj (R_Language) https://goo.gl/QFtp17 dplyr(上.下) #1LhpJCfB,#1Lhw8b-s (R_Language) https://goo.gl/GcfNoP tidyr #1Liqls1R (R_Language) https://goo.gl/pcq5nq pipeR #1NXESRm5 (R_Language) https://goo.gl/cDIzTh --



※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 114.38.128.86
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1477670532.A.716.html ※ 编辑: celestialgod (114.38.128.86), 10/29/2016 00:03:44 ※ 编辑: celestialgod (114.38.128.86), 10/29/2016 00:03:52
1F:→ abc2090614: 赞赞 10/29 01:31
2F:推 cywhale: first see ndjson~~ thanks~ 10/29 07:02
3F:推 Godkin: 10/29 10:51
4F:推 pp61022: 哇! 这方式好快啊!谢谢版主大大 10/29 11:48







like.gif 您可能会有兴趣的文章
icon.png[问题/行为] 猫晚上进房间会不会有憋尿问题
icon.pngRe: [闲聊] 选了错误的女孩成为魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一张
icon.png[心得] EMS高领长版毛衣.墨小楼MC1002
icon.png[分享] 丹龙隔热纸GE55+33+22
icon.png[问题] 清洗洗衣机
icon.png[寻物] 窗台下的空间
icon.png[闲聊] 双极の女神1 木魔爵
icon.png[售车] 新竹 1997 march 1297cc 白色 四门
icon.png[讨论] 能从照片感受到摄影者心情吗
icon.png[狂贺] 贺贺贺贺 贺!岛村卯月!总选举NO.1
icon.png[难过] 羡慕白皮肤的女生
icon.png阅读文章
icon.png[黑特]
icon.png[问题] SBK S1安装於安全帽位置
icon.png[分享] 旧woo100绝版开箱!!
icon.pngRe: [无言] 关於小包卫生纸
icon.png[开箱] E5-2683V3 RX480Strix 快睿C1 简单测试
icon.png[心得] 苍の海贼龙 地狱 执行者16PT
icon.png[售车] 1999年Virage iO 1.8EXi
icon.png[心得] 挑战33 LV10 狮子座pt solo
icon.png[闲聊] 手把手教你不被桶之新手主购教学
icon.png[分享] Civic Type R 量产版官方照无预警流出
icon.png[售车] Golf 4 2.0 银色 自排
icon.png[出售] Graco提篮汽座(有底座)2000元诚可议
icon.png[问题] 请问补牙材质掉了还能再补吗?(台中半年内
icon.png[问题] 44th 单曲 生写竟然都给重复的啊啊!
icon.png[心得] 华南红卡/icash 核卡
icon.png[问题] 拔牙矫正这样正常吗
icon.png[赠送] 老莫高业 初业 102年版
icon.png[情报] 三大行动支付 本季掀战火
icon.png[宝宝] 博客来Amos水蜡笔5/1特价五折
icon.pngRe: [心得] 新鲜人一些面试分享
icon.png[心得] 苍の海贼龙 地狱 麒麟25PT
icon.pngRe: [闲聊] (君の名は。雷慎入) 君名二创漫画翻译
icon.pngRe: [闲聊] OGN中场影片:失踪人口局 (英文字幕)
icon.png[问题] 台湾大哥大4G讯号差
icon.png[出售] [全国]全新千寻侘草LED灯, 水草

请输入看板名称,例如:Soft_Job站内搜寻

TOP