R:使用管道将单个参数传递给函数中的多个位置

问题描述

我试图专门使用管道重写以下代码(使用babynames包中的babynames数据:

I am attempting to exclusively use piping to rewrite the following code (using babynames data from babynames package:

library(babynames)
library(dplyr)

myDF <- babynames %>% 
group_by(year) %>% 
summarise(totalBirthsPerYear = sum(n))

slice(myDF, seq(1, nrow(myDF), by = 20))

我得到的最接近的代码是此代码(不起作用):

The closest I have gotten is this code (not working):

myDF <- babyNames %>% 
group_by(year) %>% 
summarise(totalBirthsPerYear = sum(n)) %>% 
slice( XXX, seq(1, nrow(XXX), by = 20))

其中XXX是通过管道传递到切片的，但我被卡住了.感谢您的帮助.

where XXX is meant to be passed via pipes to slice, but I'm stuck. Any help is appreciated.

推荐答案

您可以使用.在您的情况下，在函数中的其他位置引用管道数据:

You can reference piped data in a different position in the function by using the . In your case:

myDF2 <- babynames %>%
    group_by(year) %>%
    summarize(totalBirthsPerYear = sum(n)) %>%
    slice(seq(1, nrow(.), by = 20))

这篇关于R:使用管道将单个参数传递给函数中的多个位置的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！