Захват аргументов внутри функций в server.R

Question

Ниже приведен пример файла server.R из приложения Riny. Поэтому я хотел проверить, можем ли мы показать, что output$plot - это функция, в которой input$dist, dist, n, input$n, hist. Можно ли этого достичь?

output$plot <- renderPlot({
    dist <- input$dist
    n <- input$n

    hist(d(),
         main = paste("r", dist, "(", n, ")", sep = ""),
         col = "#75AADB", border = "white")
  })