R 多个滑块的名称

R 多个滑块的名称,r,shiny,R,Shiny,我有一个庞大而复杂的代码 我在ui中创建了一个uiOutput(“滑块”),以获得一些滑块(取决于我能够上传的数据集的列数)。 在服务器中,我有以下代码: output$sliders <- renderUI({ pvars <- file_col()/2-1 myList<-list() lapply(seq(pvars), function(i) { sliderInput(inputId = paste0("Sh

我有一个庞大而复杂的代码

我在ui中创建了一个uiOutput(“滑块”),以获得一些滑块(取决于我能够上传的数据集的列数)。 在服务器中,我有以下代码:

output$sliders <- renderUI({
    pvars <- file_col()/2-1
    myList<-list()
    lapply(seq(pvars), function(i) {
    
        sliderInput(inputId = paste0("Shiftindex", i),label = ("Shift index")
                    ,min = 0, max = 1,value= 0,step = 0.1)
    }
    )

  })

output$sliders例如,您可以使用
input[[paste0(“Shiftindex”,1)]]
在服务器端访问它们的值

您可以执行以下操作:


output$text您可以通过
input[[paste0(“Shiftindex”,1)]]
在服务器端访问它们的值。您可以执行以下操作:
r output$text@tomascapreto,请将您的评论作为答案发布,因为这可能会帮助其他人寻找类似的解决方案。非常感谢。我的问题还在于,我想使用服务器中每个滑块的值。data1我刚刚演示了如何在文本中使用,但是您可以在计算或您想要的东西中使用它们。你能给我更多关于你想做什么的信息吗?我想我没有解释清楚。我在服务器上有一个带有renderUi的ui输出。这个renderUi制作了许多滑块(取决于上传文件的列)。所以,我想取这些值并计算一个新的数字(新的数字是前一个加上滑块的值)。