R_Language 板


LINE

[问题类型]: 意见调查(我对R 有个很棒的想法,想问问大家的意见) [软体熟悉度]: 入门(写过其他程式,只是对语法不熟悉) [问题叙述]: 这里我想问的问题,比较偏重在处理资料时使用的抽样方式是否适合? 问题如下: 假设我有一份资料集,样子如下: 项次 col_1 col_2 col_3 ...... col_50 result ------------------------------------------------- 1 ... ... ... ... yes 2 ... ... ... ... yes 3 ... ... ... ... no ...... ... ... ... ... ... 500000 ... ... ... ... yes 如果: 1.这份资料集总共有 500000 笔资料。 2.资料的因变数是「result」,其值只有 yes 跟 no 两种。 3.资料中没有任何 missing value。 4.假设 yes 跟 no 的资料数量差异很大,例如达到 99:1 的程度, 也就是 yes 有 495000 笔,no 只有 5000 笔好了。 5.目的是想要找出「col_1 ~ col_50 这 50 个栏位对於 result 的影响程度」 原本我是将这 500000 笔资料原封不动的利用 R 的分类树演算法(rpart)来处理 例如指令为: formula = result ~ col_1 + col_2 + ... + col_50 x = rpart(formula, data, method="class") # data: 含 500000 笔资料 summary(x) #获得变数重要程度的资讯 但後来发现结果跑不出来,应该是 yes 与 no 的资料数量相差过於悬殊的关系 @@~ [你的答案]: 所以後来我想到用「分层抽样」的方法,针对不同的 result,用不同比例来随机抽样: 种类 笔数 抽样比例 抽样笔数 -------------------------------- yes 495000 5% 24750 no 5000 100% 5000 -------------------------------- 总计 500000 29750 在这个方法里面,我只用了 29750 笔资料 (yes:24750笔、no:5000笔) 虽然後来结果有很顺利的跑完 但是对於采用这种方法,我不晓得会有什麽样的缺点 (例如是否会因为样本数减少,导致结论偏离正确的结果) 不知道大家对於这样的抽样方式,觉得是否合理呢? 感谢大家给予意见! [关键字]: 分层抽样;rpart --



※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 1.161.165.166
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1436376149.A.8AB.html ※ 编辑: ciphero (1.161.165.166), 07/09/2015 01:23:32
1F:推 Edster: 这是错误的抽样方法,样本并不能代表母体的分配 07/09 02:35
2F:推 Edster: 我不懂什麽叫跑不出来。这几个字有很多想像,但通常跟样 07/09 02:58
3F:→ Edster: 本无关,除非结果不符预期。这时你该抽样的对象应该是变 07/09 02:59
4F:→ Edster: 数栏,而非样本。 07/09 02:59
5F:→ celestialgod: 我测试了一下随机资料 rpart确实给出错误 07/09 13:35
6F:→ celestialgod: 不过没有给错误讯息 就完全没有切割NODE 07/09 13:35
7F:→ celestialgod: summary给出error: 1 07/09 13:36
8F:→ celestialgod: tree这个套件也不行 07/09 13:40
9F:→ celestialgod: 我找到了 加control = rpart.control(cp = -1) 07/09 14:15
10F:→ celestialgod: 可以强迫分 07/09 14:15







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