# NOT RUN {
d1 <- tbl_data(
x = 1:10,
y = rnorm(10),
z = letters[1:10]
)
d2 <- tbl_data(
x = sample(1:10, 20, replace = TRUE),
y2 = rnorm(20)
)
## left join
left_join_data(d1, d2)
## right join
right_join_data(d1, d2)
## full join
full_join_data(d1, d2)
# }
Run the code above in your browser using DataLab