如何根据输入$ select加载对象

时间:2016-05-22 11:15:42

标签: r shiny

我正在尝试在Shiny应用中加载R对象。我有2个对象,根据用户选择的选项,我需要加载一个或另一个。

如果我在private void Combo1_Loaded(object sender, RoutedEventArgs e) { ComboBox1.Text = "Tahoma"; }

之外调用加载对象,我可以加载一个对象

但我需要将其加载到内部,具体取决于用户选择的选项。

我的代码就像:

shinyServer(function(input, output) {})

谢谢!

1 个答案:

答案 0 :(得分:0)

而不是observeEvent没有返回任何值(并用于副作用),使用大约相同的eventReactive,但区别在于它确实返回一个值。然后,您可以使用DT1()访问它。

shinyServer(function(input, output) {
  DT1 <- eventReactive(input$select,{
    if(input$select==1){
      return(load(file = 'DT1N', envir=.GlobalEnv))
    }else return(load(file = 'DT1B', envir=.GlobalEnv))
  }
})