R语言 将图像固定到闪亮页面的中心并将其居中

ddrv8njm  于 11个月前  发布在  其他
关注(0)|答案(1)|浏览(61)

我有一个图像,无论页面大小如何,我都希望将其居中在页面底部。但是,使用下面的代码会将图像固定在页面左侧而不是中心。有什么方法可以将其居中在底部吗?

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)

ui <- dashboardPage(
  header = dashboardHeader(),
  sidebar = dashboardSidebar(),
  body = dashboardBody(
    fluidRow(
      column(
        width = 12,
        img(
          src ='testfig.png',
          style = 'position: fixed; bottom: 0; width: 45vh; left: auto; right: auto;'
          )
        )
      )
    )
)

server <- function(input, output, session) {
}

shiny::shinyApp(ui, server)

字符串

ef1yzkbh

ef1yzkbh1#

一种方法是使用自定义CSS:

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)

ui <- dashboardPage(
  header = dashboardHeader(),
  sidebar = dashboardSidebar(),
  body = dashboardBody(
    tags$style(HTML("
      .bottom-centered-img {
        position: fixed;
        bottom: 0;
        left: 0;
        right: 0;
        width: 45vh;
        margin-left: auto;
        margin-right: auto;
      }
    ")),
    fluidRow(
      column(
        width = 12,
        img(src = 'testfig.png', class = 'bottom-centered-img')
      )
    )
  )
)

server <- function(input, output, session) {
}

shiny::shinyApp(ui, server)

字符串

相关问题