如何更正 - selectizeInput 显示在 absolutePanel 上方

Question

下面给出了我用于显示 selectizeInput 和 absolutePanel 的代码。 selectizeInput 未与页面背景合并。它显示在 absolutePanel 上方。请帮忙

ui.r

library(shinydashboard)
  shinyUI(
    fluidPage(
      dashboardPage(skin = c("blue"),
                    dashboardHeader(title = "R Tools"
                    ),
                    ## Sidebar content
                    dashboardSidebar(
                      sidebarMenu(
                        menuItem("Dashboard", tabName = "dashboard", icon = icon("dashboard")),
                        menuItem("Widgets", tabName = "widgets", icon = icon("th"))
                      )

                    ),
                    dashboardBody(
                                      box(
                                        title = "Tools", status = "primary", solidHeader = TRUE,
                                        collapsible = TRUE,width = 4,
                                        uiOutput("showtxttruevalue"),
                                        uiOutput("showddllalternate")
                                      ),
                                      absolutePanel(
                                        bottom = 20, right = 60,top=200, width = "auto",
                                        draggable = TRUE,
                                        wellPanel(
                                        "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
                                        aa")
                                        ), style = "opacity: 0.9"



                    )

      )


    ))

server.r

library(shiny)
library(ggplot2)
library(googleVis)

shinyServer(function(input, output, session) {

output$showtxttruevalue <- renderUI({
 numericInput(inputId="txttruevalue", label="TrueValue", value = 0)
})


output$showddllalternate <- renderUI({
 selectizeInput("ddllalternate", "Alternate:",c('unequal','less','greater'),   selected='<>')
 })



})

Answer 1

问题是 selectize 的 z-index CSS 属性是 1，所以显示在你的 absolutePanel 上面。

尝试将其添加为 fluidPage 的第一个元素以将 z-index 更改为 0：

tags$style(type="text/css", ".selectize-input{ z-index: 0; }")

如何更正 - selectizeInput 显示在 absolutePanel 上方

How to correct - selectizeInput getting displayed above the absolutePanel

r

rstudio

shiny