Moved from tidyverse/dplyr#1042, by @jcfisher
library(dplyr)
library(dtplyr)
dt1 <- data.table::data.table(x = 1:3, y = 3:1, key = "x")
dt2 <- data.table::data.table(x = 1:3, z = 1:3, key = "x")
class(left_join(dt1, dt2, by = "x"))
class(full_join(dt1, dt2, by = "x"))
Moved from tidyverse/dplyr#1042, by @jcfisher