Карта листовки перекрывается с раскрывающимся меню seletinput в Shiny - PullRequest
0 голосов
/ 08 июня 2019

Я пытался создать страницу, включающую листовки и некоторые боковые панели в Shiny r, но карта листовок всегда перекрывается с выпадающим меню.

enter image description here Я перепробовал много методов, таких как настройка последовательности кода, но ничего не получалось.

ui <- shinyUI(navbarPage("",
                         theme = shinytheme("flatly"),
                         tabPanel("a", 
                                  fluidPage(
                                    fluidRow(
                                      column(3, 
                                             wellPanel(
                                               selectizeInput("abc", label = h5("abc: "), 
                                                              choices = abc
                                               )
                                      ),
                                      column(9, 
                                             wellPanel(
                                               )
                                      )   
                                    ),
                                    absolutePanel(
                                      top = 420, right = 95, width = 400,
                                      draggable = FALSE,
                                      wellPanel(
                                        h3(textOutput("nb"), align = "center"),
                                        DT::dataTableOutput("table", height=280),
                                        style = "height: 500px;")
                                      ,
                                      style = "opacity: 0.85"
                                    ),
                                    leafletOutput("map", width = "100%", height = 600)
                                  )
                         )))

Кажется, листовка выходит вперед, но я хочу поставить ее сзади.

...