Javascript 带有值和标签字段的selectizeInput

我想在

shinny

中自定义一个

selectizeInput

，类似于中的示例。值和标签应该不同，并且可以选择多个条目并添加新条目（使用

create=TRUE

选项）。我已尝试使用

shinyWidgets

中的

selectizeInput

和

pickerInput

，但无法使其工作

---

您可以在这里查看一些示例：

大多数高级选项都是通过选项设置的。下面是一个没有颜色的最小示例：

ui <- fluidPage(
  selectizeInput('myInput',
                 label='Select',
                 choices=c('first choice' = 'c1'),
                 multiple = TRUE,
                 options = list(create = TRUE))  
)

---

ui您可以在这里查看一些示例：

大多数高级选项都是通过选项设置的。下面是一个没有颜色的最小示例：

ui <- fluidPage(
  selectizeInput('myInput',
                 label='Select',
                 choices=c('first choice' = 'c1'),
                 multiple = TRUE,
                 options = list(create = TRUE))  
)

ui选项
render
允许在HTML中设置项目。以下是一个例子：

library(shiny)

itemValues <- c("foo", "bar")
itemNames <- sprintf("<span style='background-color:springgreen'>%s</span>",
                     itemValues)
items <- setNames(itemValues, itemNames)

shinyApp(

  ui = fluidPage(
    selectizeInput("id", "Label", choices = items, 
                   options = list(render = I("
  {
    item: function(item, escape) { return '<div>' + item.label + '</div>'; },
    option: function(item, escape) { return '<div>' + item.label + '</div>'; }
  }")))
  ),

  server = function(input, output) {}
)

库（闪亮）
itemValues选项
render
允许在HTML中设置项目。以下是一个例子：

library(shiny)

itemValues <- c("foo", "bar")
itemNames <- sprintf("<span style='background-color:springgreen'>%s</span>",
                     itemValues)
items <- setNames(itemValues, itemNames)

shinyApp(

  ui = fluidPage(
    selectizeInput("id", "Label", choices = items, 
                   options = list(render = I("
  {
    item: function(item, escape) { return '<div>' + item.label + '</div>'; },
    option: function(item, escape) { return '<div>' + item.label + '</div>'; }
  }")))
  ),

  server = function(input, output) {}
)

库（闪亮）
项目值