Звонить sql из R

Question

con <- dbConnect(odbc::odbc(), 
                 Driver = "xxx", 
                 Server = "xxxx", 
                 Database = "xx", uid = "xxx", pwd = "xxx")

ABove - это функция для вызова sql запросов, а ниже - код для вызова таблицы в R

fac <- dbGetQuery(con, "(select * from table where Category = '",input$Cat,"')") ##input$Cat is called in UI.R

Но приведенный выше оператор не выполняется. Я звоню '",input$Cat,"' неправильно?