suppressPackageStartupMessages({
library(tidyr)
library(magrittr)
})
dat <- data.frame(item1 = letters,item2 = LETTERS)
dat %>% expand(item1,item2)
#> # A tibble: 676 x 2
#> item1 item2
#> <chr> <chr>
#> 1 a A
#> 2 a B
#> 3 a C
#> 4 a D
#> 5 a E
#> 6 a F
#> 7 a G
#> 8 a H
#> 9 a I
#> 10 a J
#> # … with 666 more rows