create a matrix from long tibble

Question

I have added a small code below

library(tidyverse)

x1 <- seq(5, 6, 0.2)
x2 <- seq(1, 2, 0.2)

tbl <- crossing(x1, x2) %>%
  mutate(output = x1 +