如何从另一个表中查找值以填充现有表列？

Question

我有一个名为Deals 的数据框，其中一个变量是$DealYear。这包含 3 个因素（2013、2014、2015）。我在 Deals 中有另一列名为 $GDPDeflator，目前未填充。例如：

#Deals table 

DealID   DealAmt  DealYear  Name  GDPDeflator   Website
100101    200       2013     ABC        0       www.abc.com
120022    3000      2014     EFG        0       www.efg.com
300012    650       2013     HIJ        0       www.hij.com

我有一个名为 Deflator 的小表，其中包含 Deals$GDPDeflator 所需的值：

#Deflator table
Year   Defl
2012   1.10
2013   1.08
2014   1.055
2015   1.046
2016   1.03 

如何根据Deals$DealYear 和Deflator$Year 从Deflator$Defl 中查找Deals$GDPDeflator 的值？

Answer 1

这是 cmets 中建议的 merge 函数的典型用法。

由于您没有提供minimal reproducible example，所以我必须准备一个玩具示例。

deals.df <- data.frame(DealID = abs(rnorm(3)),
                       DealYear = c(2013,2014,2015),
                       DealAmt = abs(rnorm(3)))
deflator.df <- data.frame(Year=c(2012:2016),
                          Defl=c(1.1,1.08,1.055,1.046,1.03))

此时您可以将deals.df 中的DealYear 重命名为Year（反之亦然），或者如下所示，使用by.x 和by.y 告诉merge 列的名称在每个数据帧中

NEW.deals.df <- merge(deals.df, deflator.df, by.x = "DealYear", by.y = "Year")

NEW.deals.df

输出

  DealYear    DealID   DealAmt  Defl
1     2013 2.4428505 0.8423267 1.080
2     2014 0.7864217 1.7308812 1.055
3     2015 1.2319621 0.7857849 1.046

现在您可以根据需要重新排列列。

请注意，您可以使用by=c("colname1","colname2",...) 匹配具有多个列作为标识符的数据框之间的行。