r - パラメータを dplyr の列名として使用する

Question

パラメータを使用して参照する列名と、データフレームから直接参照する列名を混在させるのに苦労しています。最初の関数と同じ結果を返すように 2 番目の関数を修正するのを手伝ってください

install.packages("dplyr", version = "0.5.0")`
library(dplyr)

df <- data.frame(year = 2010:2015, GVA = 1:6)
f <- function(df) {
  df %>%
  mutate(indexGVA = GVA/max(ifelse(year == 2010, GVA, 0)) * 100)
}
f(df)

g <- function(df, val = NULL) {
  df %>%
  mutate_(indexGVA = ~val/max(ifelse(year == 2010, val, 0)) * 100)
}
g(df, val = "GVA")