example_gt <- load_example_gt("gen_tbl")
# Create a dataframe to combine with the gen_tibble
df <- data.frame(region = c("A", "A", "B", "B", "A", "B", "B"))
# Combine the gen_tibble with the dataframe
example_gt <- cbind(example_gt, df)
Run the code above in your browser using DataLab