reduce_example_join.R

library(tibble)
library(dplyr)


events_tb <- tibble(
  id = 1:5,
  val1 = rnorm(5)
)

another_info_tb <- tibble(
  id = 1:5,
  val2 = rnorm(5)
)

another_another_info_tb <- tibble(
  id = 1:5,
  val3 = rnorm(5)
)

purrr::reduce(list(events_tb, another_info_tb, another_another_info_tb), 
              full_join, by = "id"
              )