r-mysql: используйте переменную r для извлечения столбца из базы данных

Могу ли я передать переменную r в функцию для выбора столбца из базы данных, чтобы каждый столбец выбирался каждый раз при изменении переменной в r:

father <- 'father'
myfun(father)

Функция:

myfun <- function (parent)
{
query <-  paste("SELECT '$parent' from table1 where EXTRACT(YEAR FROM dob) 
between '",date1,"' and '",date2,"'",sep='')

connect1 <<- dbGetQuery (con, query )
connect1
}