Следующая функция не выполняется:

get_num <- function(input$num){ans <-input$num 
                          return(ans)}

так как R смущен$ условное обозначение.

Хотя это игрушечный пример, я хотел бы написать функцию, которая напрямую принимает реактивные входные значения (в данном случае число) и делает с ними что-то значимое, без необходимости выгружать ситуацию

num <- input$num
get_num <- function(num){ans <-num 
                          return(ans)}

Это вообще возможно?