Установить положение кнопки на боковой панели Shinydashboard - PullRequest
Новая
       7

Установить положение кнопки на боковой панели Shinydashboard

0 голосов
/ 08 февраля 2019

У меня есть очень простая блестящая приборная панель, и я хотел бы установить положение этого actionbutton точно в середине боковой панели.Он должен иметь одинаковое расстояние с обеих сторон боковой панели.

app.R 

library(shiny)
library(shinydashboard)

ui <- dashboardPage(
  dashboardHeader(
title="Select Data to View or Download",
      titleWidth = 335),
  dashboardSidebar(
width = 335,
actionButton("load","Apply Selections")),
  dashboardBody()
)

server <- function(input, output) { }

shinyApp(ui, server)

Ответы [ 2 ]

0 голосов
/ 11 февраля 2019

Более простой подход (с центрированием без смещения) - установить позицию кнопки с аргументом style. 

actionButton("load", "Apply Selections", style='margin:auto')
0 голосов
/ 08 февраля 2019

Это можно сделать, указав column и установив align = "center". 

library(shiny)
library(shinydashboard)

ui <- dashboardPage(
  dashboardHeader(
    title="Select Data to View or Download",
    titleWidth = 335),
  dashboardSidebar(
    width = 335,
    column(12,align = "center",offset = 0,actionButton("load","Apply Selections"))),
  dashboardBody()
)

server <- function(input, output) { }

shinyApp(ui, server)
...