Я пытался создать страницу, включающую листовки и некоторые боковые панели в Shiny r, но карта листовок всегда перекрывается с выпадающим меню.
Я перепробовал много методов, таких как настройка последовательности кода, но ничего не получалось.
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)
)
)))
Кажется, листовка выходит вперед, но я хочу поставить ее сзади.