小编Sam*_*Sam的帖子

我正在尝试设置一个具有多个输入和多个返回值的自定义函数，并purrr::map在数据帧上使用此函数。

我的样本数据是：

test_data <- 
      tibble(x1 = 1:10, 
             x2 = 2:11,
             x3 = 3:12,
             x4 = x1 + x2 + x3)

这test_data看起来像这样：

# A tibble: 10 x 4
      x1    x2    x3    x4
   <int> <int> <int> <int>
 1     1     2     3     6
 2     2     3     4     9
 3     3     4     5    12
 4     4     5     6    15
 5     5     6     7    18
 6     6     7     8    21
 7     7     8     9    24
 8     8     9    10    27
 9 …