r - 闪亮的对齐输入控件向右或向左

Question

我有三个输入控件，并且希望在闪亮的应用程序中将一个在左侧对齐，两个在页面右侧对齐。此外，这两个selectInput控件必须并排，我使用这个答案的代码解决了这个问题。

使用column's，align = "right"我能够得到我想要的。问题是文本和选择箭头也是右对齐的，这看起来很糟糕（见下面的图片和突出显示的区域）。

是否有另一种方法来实现预期的对齐？

library(tidyverse) # loaded for the words data.frame
library(shiny)
ui <- fluidPage(
    navbarPage(
      set.seed(1233),
      fluidRow(
       column(8,radioButtons("plot", "", choices = list("Cluster"="1","Correlation"="2"), inline=T)),
       column(4, align = "right",
        div(style="display: inline-block;vertical-align:top; width: 120px;",
            selectInput("Something","Something", choices = sample(words, 5))),
        div(style="display: inline-block;vertical-align:top; width: 120px;",
            selectInput("Else","else", choices = sample(words, 6))))
      )
    )
  )

server <- function(input, output) {}  

shinyApp(ui, server)

Answer 1

我无法为您提供最佳对齐实践的建议，但在这种情况下，您可以添加

text-align:left !important;

到你的风格参数