將 function 中的數據幀的列名移交給 dplyr function count() in ZE28796D3D48ZEAF13

Question

如何將我的 function foo的參數ColName移交給 R function count ？ ColName是 dataframe 中列的名稱。

library(scales)
library(dplyr)

foo <- function(df, ColName, YearCol){

    percentData <- df %>% 
        group_by(format(as.Date(df[,YearCol]),"%Y")) %>% 
        count(ColName) %>%   # does not work like this, also df[,ColName] does not work
        mutate(ratio=scales::percent(n/sum(n)))

 }

Answer 1

您可以使用select的.dots參數來選擇您感興趣的列。

foo <- function(df, ColName, YearCol){
    percentData <- df %>% 
        select(.dots = c(ColName, YearCol)) %>%
        group_by(format(as.Date(.dots2), "%Y")) %>% 
        count(.dots1) %>%  
        mutate(ratio=scales::percent(n/sum(n)))
    percentData
}