如何将expand_grid连接到管道？

Question

这可能是一个非常愚蠢的问题，但是我坚持了下去。

我在R中有完美的工作代码：

var <- my_tibble %>%
       split(.$country) %>%
       imap(~ function_xyz(.x$index, .y))

var2 <- var %>%
        expand_grid(var[["list_a"]], var[["list_b"]]) %>%
        select(column_a, column_b)

但是我只希望在一个管道中完成所有操作，但是我不知道该怎么做。 Expand_grid在当前解决方案中引用变量var，但我不明白在一个管道解决方案中应引用的位置。由于变量var不存在，所以如果我将所有变量加在一起。