在Shiny R中创建depandant选择输入

时间:2016-06-24 06:39:45

标签: r shiny

我是R的新手,试图在r中完成以下功能 我创建了一个数据框book3

Region<- c("Americas", "Asia Pacific","Asia Pacific", "EMEA", "EMEA")


Country<- c("Mexico", "China","India", "Germany", "Spain" )

Rating<- c(5,3,3,2,4)

book3<- data.frame(Region, Country, Rating)

我想拉动将成为被告的地区和国家。我正在尝试使用此代码

ui.R

library(shiny)
shinyUI(fluidPage(
titlePanel("Test Dashboard "),
sidebarLayout(
sidebarPanel(
selectInput("data1", "Select Region", choices = c(book3$Region)), 

  selectInput("data2", "select country", choices = c(book3$Country))
   ),
mainPanel()


 )))

2 个答案:

答案 0 :(得分:1)

如果您要根据数据创建输入,则需要在 server.R 中创建输入,以便可以访问数据。您可以通过renderUIuiOutput来执行此操作。见here for reference

这是一个有效的例子。请注意renderUI( )中基于数据生成server的{​​{1}}函数

selectInput

答案 1 :(得分:1)

您可以使用服务器代码中的updateSelectInput功能,以更新selectInput字段的选项(和所选选项):

Name    CountName   CreatedDate CreatedTime
A       2           20170205    135744300
B       1           20160205    113514368
C       1           20090205    163054942