Rデータフレームに値を挿入する単純な検索

Question

これは一見単純なRの質問ですが、ここでは正確な回答はありません。私はこのようなデータフレーム（alldata）を持っています：

Case  zip  market 
1  44485 0 
2  44481 0 
0 

350万を超えるレコードがあります。

次に、2番目のデータフレーム「zipcodes」があります。

market zip 
1   44485 
1   44486 
1   44488 
...  ... (100 zips in market 1) 

2   43211 
...  ... (100 zips in market 2, etc.) 

私は郵便番号データフレームに適切な値に一致するALLDATAの$ジップに基づいて各ケースのALLDATAの$市場の正しい値を返すようにしたいです。私はちょうど正しい構文を探しているだけで、いつものように援助は非常に高く評価されています。

Answer 1

あなたはalldataにmarket列を気にしないので、最初mergeを使用してzip列に基づいalldataとzipcodesで列を使用してそれを取り除き、マージすることができます：

merge(alldata[, c("Case", "zip")], zipcodes, by="zip") 

byパラメータキー基準を指定するので、複合キーを持っている場合はby=c("zip", "otherfield")のようなことができます。

Answer 2

このような大きなデータセットを使用すると、環境の検索速度を向上させることができます。次のようにqdapTools packageからlookup機能を使用することができます。

library(qdapTools) 
alldata$market <- lookup(alldata$zip, zipcodes[, 2:1]) 

それとも

を

alldata$zip %l% zipcodes[, 2:1] 

Answer 3

ここでそれを行うのdplyr方法があります：

私のマシン上で、おおよそで、

library(tidyverse) 
alldata %>% 
    select(-market) %>% 
    left_join(zipcodes, by="zip") 

lookupと同じパフォーマンスです。

Answer 4

私のために働いた、非常にシンプルであるもう一つのオプション：あなたはmerge` `を探している

alldata$market<-with(zipcodes, market[match(alldata$zip, zip)])