2

Rshinyを使用して、selectInputアイテムをファイルを開くアクションボタンにリンクすることは可能ですか? アクションボタンの onclick 引数を調整してそれを実現したいと思います。

再現可能な例を以下に示します。

「www」フォルダに「file_1.pdf」と「file_2.pdf」があるとすると、選択した入力選択に対応するファイルを開くにはどうすればよいですか?

library(shinydashboard)
library(shiny)


ui <- dashboardPage(
  dashboardHeader(title = "Open file app"),
  dashboardSidebar(),
  dashboardBody(
        fluidRow(
          selectInput(inputId = "file_choice",label = "Choose the file to open",choices = c("file_1","file_2")),
          actionButton("bell","Open the selected file", class = "btn action-button",onclick = "window.open('file_1.pdf')")) #onclick argument must be adapted 
          )
)

server <- function(input, output) {}

shinyApp(ui, server)

どうもありがとう！

4

1 に答える 1

2

できるよ

  selectInput(inputId = "file_choice", 
              label = "Choose the file to open", 
              choices = c("file_1"="Rplot01.png","file_2"="Rplot02.png")),
  actionButton("bell","Open the selected file", class = "btn action-button", 
               onclick = "window.open($('#file_choice').val())"))

説明: $(...)はセレクターです。$('#file_choice')id の要素を選択しfile_choiceます。これはselectInputです。そして$('#file_choice').val()、選択されたオプションの値を返します。

于 2018-09-19T13:21:23.590 に答える