修改数据框上的__

Question

我没有在purrr::modify_if语法中找到基本的东西。

说我想做一些愚蠢的事情 - 拿一个名字长2个字符的变量，然后剪掉它。

这是我的尝试：

library(tidyverse)
library(stringr)
library(magrittr)

mtcars %>% 
   modify_if(~. %>% 
          names %>%
          str_length %>%
          equals(2),
      function(i)
         cut_number(i, n = 2))

如何在第一个参数中传递一组逻辑预测？

Answer 1

正如@thelatemail所指出的，问题是返回逻辑谓词的第一个函数需要查看name属性。修复此工作：

mtcars %>% 
   modify_if(mtcars %>% 
      names %>% 
      str_length %>% 
      equals(2),
   function(i) 
      i %>% 
      cut_interval(n = 2))