在R中处理管道的'c()'函数的替代方法？

vwoqyblh 于 2023-01-15 发布在其他

关注(0)|答案(3)|浏览(120)

将c()与管道操作符一起使用的解决方法是添加大括号

library(dplyr)

mtcars %>% {
  c(.$mpg, .$cyl)
}

但这并不好看。
在R中使用管道的c函数是否有替代方法？

library(dplyr)

mtcars %>% 
  alternative_c(.$mpg, .$cyl) # Does such a function exist?

来源：https://stackoverflow.com/questions/73863667/alternative-to-the-c-function-that-works-with-pipes-in-r

3条答案

按热度按时间

4xy9mtcn1#

另一种方法是通过管道传输到with()：

mtcars %>% 
   with(c(mpg, cyl))

 [1] 21.0 21.0 22.8 21.4 18.7 18.1 14.3 24.4 22.8 19.2 17.8 16.4 17.3 15.2 10.4 10.4 14.7 32.4 30.4 33.9 21.5 15.5 15.2
[24] 13.3 19.2 27.3 26.0 30.4 15.8 19.7 15.0 21.4  6.0  6.0  4.0  6.0  8.0  6.0  8.0  4.0  4.0  6.0  6.0  8.0  8.0  8.0
[47]  8.0  8.0  8.0  4.0  4.0  4.0  4.0  8.0  8.0  8.0  8.0  4.0  4.0  4.0  8.0  6.0  8.0  4.0

赞(0）回复(0）举报 2023-01-15

oknwwptz2#

使用匿名函数的解决方案

mtcars %>% 
  (\(.) c(.$mpg, .$cyl))

 [1] 21.0 21.0 22.8 21.4 18.7 18.1 14.3 24.4 22.8 19.2 17.8 16.4 17.3 15.2 10.4 10.4 14.7 32.4 30.4 33.9 21.5 15.5 15.2 13.3
[25] 19.2 27.3 26.0 30.4 15.8 19.7 15.0 21.4  6.0  6.0  4.0  6.0  8.0  6.0  8.0  4.0  4.0  6.0  6.0  8.0  8.0  8.0  8.0  8.0
[49]  8.0  4.0  4.0  4.0  4.0  8.0  8.0  8.0  8.0  4.0  4.0  4.0  8.0  6.0  8.0  4.0

赞(0）回复(0）举报 2023-01-15

mzillmmw3#

使用magrittr曝光管%$%，您可以执行以下操作：

library(magrittr)

mtcars %$% c(mpg, cyl)
#>  [1] 21.0 21.0 22.8 21.4 18.7 18.1 14.3 24.4 22.8 19.2 17.8 16.4 17.3 15.2 10.4
#> [16] 10.4 14.7 32.4 30.4 33.9 21.5 15.5 15.2 13.3 19.2 27.3 26.0 30.4 15.8 19.7
#> [31] 15.0 21.4  6.0  6.0  4.0  6.0  8.0  6.0  8.0  4.0  4.0  6.0  6.0  8.0  8.0
#> [46]  8.0  8.0  8.0  8.0  4.0  4.0  4.0  4.0  8.0  8.0  8.0  8.0  4.0  4.0  4.0
#> [61]  8.0  6.0  8.0  4.0

赞(0）回复(0）举报 2023-01-15

我来回答

在R中处理管道的'c()'函数的替代方法？

3条答案

相关问题

热门标签

最新问答