이름 대신 문자 매개 변수의 값을 리터럴로 사용하도록 "dplyr select"를 만드는 방법은 무엇입니까?

데이터 프레임에서 하나의 열을 선택하는 간단한 기능이 있습니다. 매개 변수 "my_column"은 선택할 열의 이름입니다. datafame에 "my_column"이라는 열이 포함 된 경우 함수가 제대로 작동하지 않습니다. 예를 들면 다음과 같습니다.

library(dplyr)
select_one_column<-function(df,my_column) { select(df,my_column) }

df11 <- data.frame(
  var1 = c( 'good', 'good'),
  var2 = c( 'good2', 'good2') )

df22 <- data.frame(
  var1 = c( 'good', 'good'),
  var2 = c( 'good2', 'good2'),
  my_column=c('bad','bad') )

select_one_column(df11,"var1")```

결과:

var1

1 개

2 좋음

select_one_column(df22,'var1')

결과:

my_column

1 개 불량

2 나쁨

이름 대신 문자 매개 변수의 값을 리터럴로 사용하도록 "dplyr select"를 만드는 방법은 무엇입니까?