Statistics 板


LINE

不好意思占版面回一下自己的文章 1.我改成只抽20笔 还是一样超过memory size 不知道还有没有别的办法可以做 我总共需要使用这三万多笔资料 抽样两百次 每次包含一万笔 2.接着用这两百个sets 每一个各做一次回归 一次损失代入 然後比较观察值 有什麽办法可以完成第一笔吗? 因为如果连20笔都超过size 总不会叫我一笔一笔抽抽两百次吧 : Error: cannot allocate vector of size 120 Kb : In addition: Warning messages: : 1: In structure(y, class = oldClass(x), row.names = .row_names_info(x, : : Reached total allocation of 6124Mb: see help(memory.size) : 2: In structure(y, class = oldClass(x), row.names = .row_names_info(x, : : Reached total allocation of 6124Mb: see help(memory.size) : 以上是sapWater<-replicate(n,sample(Water0, 10000, TRUE)) #n<-200 : 得到的error message : 我想做的有两步 : 1.从Water0(三万多row*14col)中 可重复每次独立取出一万笔重复两百次 : 2.将这两百个subset各做一次回归 比较这两百次得到的response vb : 两个问题 第一步得到这样的error是说我没办法用R做吗? : 再者 我有回归的程式 但是我不太会用loop 可不可以请高手教我 : 怎麽 写一条程式 让这两百个subset(每一个是一万row*14col) 自己都做一次回归 : 谢谢 <(_ _)> --



※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 174.101.220.112
1F:→ obarisk:你先试试sample()那里,一步一步确认! 02/21 21:00
3q~
2F:→ clickhere:就是要 for loop 抽200次!! 一次都过不了, 还渴望20? 02/21 21:04
3F:推 clickhere:按你的叙述, id <- sample(1:nrow(Water0),10000,TRUE) 02/21 21:08
4F:→ clickhere:subW0 <- Water0[id,] 这才是你要的一次抽样. 02/21 21:08
大感谢~
5F:→ clickhere:我猜你要对14个变数做回归. dim(subW0) 为10000*14. 02/21 21:11
6F:→ clickhere:你的sample把整个Water0,copy到sample funtion中, 做WR 02/21 21:17
7F:→ clickhere:整个回传n*10000的矩阵(至少2个这样的矩阵,在replicate 02/21 21:19
8F:→ clickhere:如果Water0是data.frame(我猜是),那你是在 sample 变数 02/21 21:22
9F:→ clickhere:也就是说回传 3万*10000 的data.frame 20个. 02/21 21:23
10F:→ clickhere:重覆14个col,抽10000次,对3万个row做回归?? 不暴都难 02/21 21:28
11F:→ clickhere:cheer 02/21 21:29
12F:推 Puffle:抽出来这个动作是可以每次写出然後贴上成一个档案。 02/22 04:32
13F:→ Puffle:你原本的资料可以读到吗? 02/22 04:32
可以 ※ 编辑: cawaiilulu 来自: 174.101.220.112 (02/22 11:49)
14F:推 LITTLEN:为啥不要每次做一次回归後就把资料取代..不用全存吧 02/25 12:54







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灯, 水草

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

TOP