基于px的verbatimTextOutput宽度

Question

有没有办法根据verbatimTextOutput来调整px的宽度？到目前为止，我发现

fluidRow(column(width = 2,verbatimTextOutput("placeholder", placeholder = TRUE)))

根据选定的列数更改verbatimTextOutput的宽度。如何根据px将其更改为宽度？例如，在想要有width = 280px。

FYI，我使用renderText显示结果。

极品！

Answer 1

您可以将style应用于：

rm(list = ls())
library(shiny)
ui <- fluidPage(
  div(style="width:500px;",fluidRow(verbatimTextOutput("placeholder", placeholder = TRUE)))
)

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

  output$placeholder <- renderText({"Testing Size by px"})

}

shinyApp(ui, server)

编辑:添加填充：

您可以使用padding、padding-left或padding-top等来添加小部件之间的空间：

rm(list = ls())
library(shiny)
ui <- fluidPage(
  div(style="width:500px;padding-left:100px;",fluidRow(verbatimTextOutput("placeholder", placeholder = TRUE)))
)

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

  output$placeholder <- renderText({"Testing Size by px"})

}

shinyApp(ui, server)