Я делаю приложение с блестящим, и мне нужна таблица данных, которая реагирует на ввод, но когда я визуализирую таблицу данных, я получаю следующую ошибку
Ошибка: объект типа «замыкание» не является подмножеством
Это функция в server.R
output$elites <- renderUI({
req(input$iterationsElites)
allElites <- iraceResults$allElites[[input$iterationsElites]]
for(i in allElites)
{
bestConfiguration <- getConfigurationById(iraceResults, ids=i)
print(bestConfiguration)
}
DT::renderDataTable({
DT::datatable(
bestConfiguration
)
})
})
ui.R
fluidRow(
box(title = "Elite Configurations",
status = "primary",
numericInput("iterationsElites","Select Iteration",value = 1,min = 1,max = iraceResults$state$nbIterations),
uiOutput("elites"),
width = 15
)
),
заранее спасибо
ИЗМЕНИТЬ
получитьконфигуратионбид:
.ID. algorithm localsearch alpha beta rho ants q0 rasrank elitistants nnls dlb .PARENT.
7 7 as 0 4.96 0.81 0.27 32 NA NA NA NA <NA> NA
.ID. algorithm localsearch alpha beta rho ants q0 rasrank elitistants nnls dlb .PARENT.
52 52 as 1 0.35 6.72 0.11 92 NA NA NA 8 0 NA
.ID. algorithm localsearch alpha beta rho ants q0 rasrank elitistants nnls dlb .PARENT.
73 73 as 3 0.61 2.29 0.66 34 NA NA NA 22 1 NA
.ID. algorithm localsearch alpha beta rho ants q0 rasrank elitistants nnls dlb .PARENT.
67 67 mmas 3 2.73 7.98 0.97 34 NA NA NA 41 0 NA
.ID. algorithm localsearch alpha beta rho ants q0 rasrank elitistants nnls dlb .PARENT.
58 58 eas 2 0.32 2.97 0.72 80 NA NA 58 6 1 NA
Переменная allElites содержит идентификатор для получения конфигурации через функцию getConfigurationByID.
[1] 7 52 73 67 58
Спасибо за ответы
getConfigurationById
? Я не думаю, что вы хотите вкладыватьrenderDataTable
вrenderUI
- person MrFlick   schedule 13.11.2019allElites <- iraceResults$allElites[[input$iterationsElites]]
. Да, вы должны предоставить нам свои данные. - person Vitali Avagyan   schedule 13.11.2019