Конвертировать файл сервера в HTML

Question

Хотел проверить, могу ли я преобразовать файл server.R в HTML. Пример файла сервера ниже

server.R

library(shiny)

shinyServer(function(input, output) {

  output$greeting <- renderText({
    paste0("Hello, ", input$name, "!")
  })
  print(getwd())
  })

Answer 1

Можно, попробуйте shinyAce. Смотрите мой пример ниже. Он не только дает вам симпатичную рамку html, а также подсветку синтаксиса r.

library(shiny)
library(shinyAce)
# load your server file for the right path
server_text <- readLines("server.R")
ui <- fluidPage(
    aceEditor(outputId = "show_server", value = server_text, readOnly = TRUE, mode = "r")
)
server <- function(input, output) {}
shinyApp(ui = ui, server = server)