通过匹配数据帧之间的两个值在数据帧中创建新列

Question

基本上，它应该在步骤中找到指标为43且步骤=1的行，然后将该值放在新列中，在这种情况下，它将是“Gross value Added”。任何帮助都将非常感谢！

Answer 1

如果我的解释是正确的，把它看作一个连接而不是变异可能会让它变得更容易

我创建了虚拟数据，希望这将使我所做的假设变得清晰。数据。

所以我们有两张桌子。在这两者中，我们都有IndicatorID和step。然后在step dataframe中，我们有一个var'stepname'，我们希望能够通过在IndicatorID和step上进行匹配，在第三个名为step1的表中使用这些值。

step <- tibble(
        IndicatorID = c(41, 42, 43, 44, 45, 46), 
        Step = c(1, 2, 1, 4, 5, 6), 
        StepName = c('left', 'right', 'up', 'down', 'under', 'over'))


iData <- tibble(
        IndicatorID = c(seq(from = 1, to = 43)), 
        InputA = runif(43), 
        InputB = runif(43)) %>%
        mutate(iresult = InputA + InputB)

Step1 <- iData %>%
        filter(IndicatorID == 43) %>%
        mutate(Step = 1) %>%
        left_join(step, by = c('IndicatorID', 'Step'))

IndicatorID InputA InputB iresult  Step StepName
        <dbl>  <dbl>  <dbl>   <dbl> <dbl> <chr>   
          43  0.773  0.124   0.898     1 up   


### Example where we select only the columns from step 
### that we are interested in keeping, without doing a semi_join

Step1 <- iData %>%
        filter(IndicatorID == 43) %>%
        mutate(Step = 1) %>%
        left_join(step %>%
             select(IndicatorID, Step, StepName), 
             by = c('IndicatorID', 'Step'))