我有一个像这样的 Shiny 应用:
library(shiny)
UI <- fluidPage(
numericInput("obs", "Observations:", 10, min = 1, max = 100),
numericInput("obs", "Observations:", 10, min = 1, max = 100)
)
Server <- function(input, output) {}
shinyApp(ui = UI, server = Server)
如果我删除这样的标题:
UI <- fluidPage(
numericInput("obs", "", 10, min = 1, max = 100),
numericInput("obs", "", 10, min = 1, max = 100)
)
Server <- function(input, output) {}
shinyApp(ui = UI, server = Server)
输入字段上方仍有空白区域。关于我如何摆脱这个有什么想法吗?
最佳答案
如果您想要空字段,请使用 NULL
作为标签:
library(shiny)
UI <- fluidPage(
numericInput("obs", "Observations:", 10, min = 1, max = 100),
numericInput("obs", "", 10, min = 1, max = 100),
numericInput("obs", NULL, 10, min = 1, max = 100)
)
Server <- function(input, output) {}
shinyApp(ui = UI, server = Server)
关于从输入字段中删除标签,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/48042528/