x1 <- 1:3
x2 <- letters[1L:3L]
xy_grid(x1, x2, gr = 3, col.names = c("x1", "x2")) # will have 3^2=9 rows
xy_grid(m <- cbind(x1, x2), gr = 3) # equivalent
xy_grid(d <- as.data.frame(m), gr = 3) # equivalent
xy_grid(x2 ~ x1, data = d, gr = 3) # equivalent
Run the code above in your browser using DataLab