闪亮的检索来自selectize renderedUI的数据

Question

我正在尝试创建一个闪亮的应用程序，我从CSV加载数据，使用CSV中的数据填充选择菜单，让用户点击操作按钮，然后将数据发送回我可以操作的服务器它。我目前的问题是我无法返回任何已选择的数据。选择列表填充奇妙，但从那里我无法操纵服务器上的任何结果。

我在下面附上了一些代码段。

感谢您的时间！

server.R：

output$singlefactor <- renderUI({
name<-name()
selectizeInput("sfactor", "Select Last Name:", name$last.name,multiple=T)})

select_text<-eventReactive(input$goButton,{
updateSelectizeInput(session, "sfactor", server =TRUE,selected=input$sfactor)
print(input$sfactor)})

ui.R

 tabPanel("Name Search",
       sidebarLayout(
         sidebarPanel(uiOutput("singlefactor"),
                      actionButton("goButton", "Search"))