Как передать / оценить аргументы функции в другой функции для использования с ggplot?

Пожалуйста, рассмотрите следующий код:

test <- function(x,n){

selection<-names(x)[n]
graph <- ggplot(x, aes(factor(selection)))
graph + geom_bar()
}

test(mtcars,1)

Выдает ошибку, потому что R не может найти выбор. Я также играл сsubstitute, eval а такжеget безуспешно. я нашелэтот похожий вопрос и думал, что понялJoris' ответить, но не могу использовать тот же трюк для аргументов ggplot.

Ответы на вопрос(1)

Ваш ответ на вопрос