R_Language 板


LINE

[問題敘述]: 想把A資料中 >0 的欄位留下並合併 轉成另一張table, 空值補0 簡化後示意範例如下 No A B C D E F G 1 1 3 0 0 4 2 1 2 1 0 0 0 2 0 3 3 0 1 0 3 0 0 0 4 1 3 2 1 0 0 0 5 0 6 0 0 0 0 0 6 0 0 0 0 2 2 1 轉成另一個data.frame No a b c d e f g 1 1 3 4 2 1 0 0 2 1 2 3 0 0 0 0 3 1 3 0 0 0 0 0 4 1 3 2 1 0 0 0 5 6 0 0 0 0 0 0 6 2 2 1 0 0 0 0 謝謝 --



※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 175.180.110.128
※ 文章網址: https://webptt.com/m.aspx?n=bbs/R_Language/M.1442051179.A.F73.html
1F:→ celestialgod: 跟這篇類似 #1LegOjwB (R_Language) 09/12 17:51
2F:→ thephone: 謝謝c大  先研究看看 09/12 18:03
3F:→ celestialgod: 想了一下 我覺得最快的方法還是直接抓... 09/12 18:10
4F:→ celestialgod: 這篇不適合那篇的方法 09/12 18:10
5F:→ celestialgod: http://pastebin.com/AGvNGg46 09/12 18:21
6F:→ celestialgod: 這樣因為是row by row比較慢 09/12 18:21
7F:→ celestialgod: http://pastebin.com/vWHDkxh5 09/12 18:34
8F:→ celestialgod: 用字串處理比較快 09/12 18:34
9F:→ thephone: 學到了 謝謝c大 09/12 18:52
10F:→ celestialgod: http://pastebin.com/uinsNESR Rcpp version 09/12 20:38
謝謝解答 想進一步請問 在一個data.frame中 No1消費者 有A B C D四種消費時間點 A1代表No1 在第一次消費時點的消費金額 A2 A3 A4 A5代表No1第一次消費時點的其他狀態(停留時間、點擊商品數量..等) B1 代表No1 在第二次消費時點的消費金額 B2 B3 B4 B5代表No2第二次消費時點的其他狀態 欲拿掉消費金額<5的群組 (即判斷每個群組的第一位是否<5,若<5,則將其消費伴隨的狀態也移除) 剩餘的往左靠齊 No A1 A2 A3 A4 A5 | B1 B2 B3 B4 B5 | C1 C2 C3 C4 C5 | D1 D2 D3 D4 D5 1 5 6 3 2 1 | 10 11 12 13 14 | 1 1 2 3 4 | 5 5 5 5 9 2 1 2 3 4 5 | 1 1 1 1 1 | 5 8 7 6 5 | 5 3 2 1 0 第一位消費者的A1 B1 C1 >=5 則留下ABC三個群組 第二位消費者的C1 D1 >=5 則留下CD 兩個群組 靠右平移 成為以下table | | | No A1 A2 A3 A4 A5 | B1 B2 B3 B4 B5 | C1 C2 C3 C4 C5 | D1 D2 D3 D4 D5 1 5 6 3 2 1 | 10 11 12 13 14 | 5 5 5 5 9 | 2 5 8 7 6 5 | 5 3 2 1 0 | | 我是使用for迴圈一行一行掃來完成的 想請問當資料量較大的時候[500000*20000] 有其他建議使用的方法嗎? ※ 編輯: thephone (122.147.21.174), 09/15/2015 00:19:57
11F:推 celestialgod: 看不太懂 可以麻煩你再詳細一點說明嗎? 09/15 08:10
12F:→ celestialgod: 那為什麼轉好的表,第二列還有<5的 09/15 10:05
13F:→ celestialgod: 而且前面少了一個5... 09/15 10:06
14F:→ celestialgod: http://pastebin.com/4iazxG0j 09/15 10:11
15F:→ celestialgod: 我先照你的邏輯寫給你,你先試試看 09/15 10:12
16F:→ celestialgod: 反正就是把<5的都變成0 就回到你原本的問題了 09/15 10:13
之前題意表達不清楚 非常感謝C大熱心協助 ※ 編輯: thephone (122.147.21.174), 09/15/2015 20:59:54
17F:→ celestialgod: 這個完全不一樣了qq 09/15 21:10
18F:→ celestialgod: 我想想,再直接回文好了... 09/15 21:11
19F:→ thephone: many thanks :) 09/15 21:17







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

請輸入看板名稱,例如:BuyTogether站內搜尋

TOP