R_Language 板


LINE

舉例來說 x=c(123,456,897,243,651,852,964,357,555) y=c(651,852,111) 我想要從 x 中 篩選出 y 中有的變數 651 852 111 111沒有出現在 x 中 所以不用顯示出來 基本上我想要的就是位置 5,6 ( 651=x[5] 852=x[6] ) 目前我的想法是 #先用布林值去判斷哪個為true #再去找位置 bo = as.integer( x == y[1] ) bo_matr = matrix(bo) map = which(apply(bo_matr, 1L,function(row) all(row == 1))) 這樣就很清楚知道是 x 中的 5,6 是我要的 (因為 true=1 ) 但是這樣很花時間 因為我 x y 各有上百萬筆row 每次都百萬筆去做布林比對 非常沒效率 所以想問問看有沒有類似函數可以幫我做篩選 謝謝 --



※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.36.53.171
※ 文章網址: https://webptt.com/m.aspx?n=bbs/R_Language/M.1471345900.A.1A8.html
1F:→ andrew43: x %in% y 如何? 08/16 19:27
2F:→ andrew43: 但這不能告訴你誰是誰… 08/16 19:28
感謝版主T.T 成功了 看起來是一次比對全部 執行速度也很快 另外類似這種 %in% 的用法 有文章介紹嗎? http://chingchuan-chen.github.io/r/2015/07/01/magrittr 我有看過這篇 裡面有講一些 a_list %>% unlist %>% unique %>% sort 這些寫得蠻詳細的 正在學習中 這種方法對我來說 算是比較高階的語法了 目前我資料整理 都還是用矩陣的方式 篩選 合併 cbind 這類的code 謝謝
3F:→ celestialgod: library(pipeR); match(y,x) %>>% `[`(!is.na(.)) 08/16 19:40
※ 編輯: f496328mm (114.36.53.171), 08/16/2016 19:47:32
4F:→ celestialgod: 第一次看到自己部落格在別人文章中有點害羞>///< 08/16 19:48
>///< 話說R版的版主都好熱心 回應速度都超快 學到了很多 感謝>< ※ 編輯: f496328mm (114.36.53.171), 08/16/2016 19:52:22 ※ 編輯: f496328mm (114.36.53.171), 08/16/2016 19:53:24







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

請輸入看板名稱,例如:Boy-Girl站內搜尋

TOP