Как создать и отобразить новую таблицу данных на основе выбора строки из существующей таблицы данных выше, используя кнопку подтверждения выбора - PullRequest
0 голосов
/ 21 января 2019

Сохранение и отображение данных на основе выбора строки из существующего источника данных

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

library(shiny)
library(ggplot2)  # for the diamonds dataset

ui <- fluidPage(
  title = "Examples of DataTables",

    mainPanel(
      tabsetPanel(
        id = 'dataset',
        tabPanel("Global Library", DT::dataTableOutput("mytable1")),
        tabPanel("mtcars", DT::dataTableOutput("mytable2")),
        tabPanel("iris", DT::dataTableOutput("mytable3"))
      )
    )

)

library(shiny)

# Define server logic required to draw a histogram
server <- function(input, output) {

  # choose columns to display

  output$mytable1 <- DT::renderDataTable({
    DT::datatable(data1, options = list(orderClasses = TRUE ,autoWidth=TRUE),filter = 'top')
  })

  # sorted columns are colored now because CSS are attached to them
  output$mytable2 <- DT::renderDataTable({
    DT::datatable(mtcars, options = list(orderClasses = TRUE))
  })

  # customize the length drop-down menu; display 5 rows per page by default
  output$mytable3 <- DT::renderDataTable({
    DT::datatable(iris, options = list(lengthMenu = c(5, 30, 50), pageLength = 5,autoWidth=TRUE))
  })

}

Мне нужно добавить кнопку, называемую сохранить детали, под таблицей на первой вкладке, и мне нужно создать и отобразить выбранные выходные данные под кнопкой, чтобыотобразить выбранные выходные данные из первой таблицы.

Я новичок в stackverflow, помогите, пожалуйста, игнорируйте дополнительный код

...