我在Shiny中调整两个输入小部件时遇到问题。
uiOutput()
生成)在同一行底部对齐。 我目前的方法抵消了两个小部件:
当我想要的是:
我的代码:
library(shiny)
ui <- fluidPage(
fluidRow(
column(width = 4,
passwordInput(inputId = "answer.pass", label = "", value = "",
placeholder = "Enter Password for Answer")
),
column(width = 2, offset = 0,
uiOutput("actionBut.out")
)
)
)
server <- function(input, output) {
output$actionBut.out <- renderUI({
actionButton("copyButton1","Copy Code")
})
}
shinyApp(ui = ui, server = server)
我遇到其他SO帖子和其他似乎有类似问题的网站,但他们的解决方案都没有适用于我的例子。
有人可以推荐一个工作解决方案吗?谢谢!