如何在Shiny data.frame中保存用户输入的动态输入 - 没有。每个用户的输入更改，数据帧也是如此

Question

我有一个程序，我要求用户输入资产名称和资产的权重（％拥有）。它是动态的，即一个用户可以拥有3个资产，另一个用户可以拥有20个资产。因此用于保存输入的data.frame也必须是动态的。 我试图找出如何以动态方式保存数据。我尝试使用shiny_incubator包使用matrixInput，但对我来说效果不好，特别是因为它是一个矩阵，我试图存储一个data.frame（数字+字符串在我的输入中）。

下面是根据用户在其投资组合中持有的资产总数输入输入的代码。免责声明 - treysp 帮我写了这篇文章。

server.UI

 shinyServer( function(input, output, session) {

   output$tickers <- renderUI({
       numAssets <- as.integer(input$assets)

         lapply(1:numAssets, function(i) {
          list(tags$p(tags$u(h4(paste0("Asset ", i)))),
          textInput(paste0("ticker", i), label = "Ticker Name", value = "Enter ticker..."),
         numericInput(paste0("weight", i), label = "Weight of Asset", value=0))  
                                })
                          })
                                               })