r - 使用管道时找不到错误对象 "."

Question

很抱歉，如果这是重复的，但我找不到它:

我正在尝试使用 .来自 magrittr 的管道 (%>%) 的占位符，它在第二次调用时似乎不起作用。

例如，这有效:

data.frame(t = c(1.1,2.2,3.3), y = c(1,2,3)) %$% (t-y)^2 %>% sum(.)

但这不是:

data.frame(t = c(1.1,2.2,3.3), y = c(1,2,3)) %$% (t-y)^2 %>% sum(.)/length(.) 

对于为什么会发生这种情况有任何直觉吗？谢谢!

丹尼

Answer 1

我们需要将它放在大括号内，以便作为一个单元进行评估

data.frame(t = c(1.1,2.2,3.3), y = c(1,2,3)) %$%
          (t-y)^2 %>% 
          {sum(.)/length(.)} 
#[1] 0.04666667

与 mean 相同

data.frame(t = c(1.1,2.2,3.3), y = c(1,2,3)) %$%
      (t-y)^2 %>% 
      mean
#[1] 0.04666667