Соединение R Блестящий с MySQL, MySQL работает в RDS (AWS) - PullRequest
0 голосов
/ 08 февраля 2019

Во-первых, я хочу подключить блестящее приложение с MySQL в RDS (AWS).После подключения Блестящего к MySQL я хочу сохранить свой блестящий вывод в базе данных, чтобы после генерации моего вывода мне не нужно было снова компилировать мою программу, и я мог получить данные из моей базы данных.После глубокого поиска в Google я получаю следующий скрипт для получения данных

library(shiny)
library(DBI)
ui <- fluidPage(
 textInput("ID", "Enter your ID:", "5"),
  tableOutput("tbl")
)

server <- function(input, output, session) {
output$tbl <- renderTable({
conn <- dbConnect(
  drv = RMySQL::MySQL(),
  dbname = "shinydemo",
  host = "shiny-demo.csa7qlmguqrf.us-east-1.rds.amazonaws.com",
  username = "guest",
  password = "guest")
on.exit(dbDisconnect(conn), add = TRUE)
query <- paste0("SELECT * FROM City WHERE ID = '", input$ID, "';")
dbGetQuery(conn, query)
  })
}

shinyApp(ui, server)

Я не получаю никакого скрипта помощи для сохранения моих выходных данных в моей базе данных.Любая помощь, пожалуйста.

...