purrr-dplyr管道操作符在复合函数中的用法及可行性问询

首先，我们来拆解你遇到的问题根源：管道操作符%>%的默认行为是将左侧结果作为右侧函数的第一个参数，你最初的写法没有打破这个默认规则，才导致参数传递不符合预期。

问题出在哪？ #

你的无管道目标代码是：

rep(1, length(table(z0)))

这里rep的第一个参数是1，第二个参数是length(table(z0))——核心是让table(z0)的长度作为rep的第二个参数。

而你最初的管道写法：

z0 %>% table %>% rep(1, length(.))

等价于：

rep(table(z0), 1, length(table(z0)))

管道默认把table(z0)传给了rep的第一个参数，这显然和你想要的效果完全不同——你得到的是table(z0)的重复结果，而非rep(1, 长度值)。

如何实现y %>% f(x, g(.))的写法？ #

当然可以！你只需要用**大括号{}**包裹右侧的表达式，就能打破管道的默认参数传递逻辑，在表达式中任意位置用.引用左侧传递过来的值。

针对你的任务，正确的管道写法是：

z0 %>% table %>% { rep(1, length(.)) }

这里的大括号告诉管道：不要把左侧的table(z0)直接传给rep的第一个参数，而是在大括号的表达式里，用.明确指代table(z0)，因此完全等价于rep(1, length(table(z0)))，和无管道写法的结果完全一致。

原理延伸 #

当你使用y %>% { f(x, g(.)) }时，大括号内的表达式会被当作一个整体求值，.清晰指代左侧的y，因此完全等价于f(x, g(y))。这种写法适用于所有需要将左侧结果嵌入到右侧函数非第一个参数，或者更复杂表达式的场景。

比如要计算sum(sqrt(log(y)))，用管道就可以写成：

y %>% { sum(sqrt(log(.))) }

内容的提问来源于stack exchange，提问作者Nicolas Molano