R dplyr - mutate/summarizeの文字列として変数名を取得

Question

私は、dplyr :: mutate（）の関数に渡された変数の名前を抽出しようとして失敗しています。以下は私がのmutate内の文字列「MPG」を返す関数を作成する簡単な例です：

# mtcars dataset with grouping variable 
dataset = mtcars 
dataset$group = c(1, 2, 3, 4) 

# function to call inside mutate() 
f = function(col, data){ 
    str_col = deparse(lazyeval::expr_find(col)) 
    str_col 
} 

# this does not work: returns the content of mpg 
# instead of the variable name as a string 
dataset %>% 
    group_by(group) %>% 
    mutate(f = f(mpg, dataset) 
) %>% 
    select(group, f) 

私はlazyeval使用:: expr_find（）、subsituteのみ限り一つの層を「上がる」ので、私はその文書を理解した。関数wrap（）内でf（）を呼び出すと動作しますが、group_by（）％>％mutate（）の中に入れると、mpgの代わりにmpgの内容を返します。

いくつかの質問が関連していますが、それらのどれも私の問題を解決するものではありません。大歓迎

すべてのヘルプ:)

Answer 1

私はまだあなたがやろうとしているもので、完全に明確ではないんだけど、多分これは役立ちます：

f = function(col, data){ 
    str_col = deparse(substitute(col)) 
    data.frame(str_col) 
} 

dataset %>% 
    group_by(group) %>% 
    do(f(mpg, .))