Simpler Way to Fill Missing Data?

Hey #rstats, so I do a pattern like this all the time— essentially fill in missing values from some other data source. I feel like there must be some *_join or other incantation that does this cleaner… is there or should I just write my own utility function?

1
2
3
4

transactions %>%
  left_join(po_vendors, by = "po") %>%
  mutate(vendor = coalesce(vendor.x, vendor.y)) %>%
  select(-matches("\\..$"))