如何删除与Shiny控件小部件的标签对应的像素？

Question

出于绘图目的，我需要将两个小部件作为一组安排，并需要删除第一个小部件下方的空白区域。非常感谢任何帮助。

library(shiny)
plotvars <- c("Cars","Book stores")
ui <- fluidPage(
   sidebarPanel(
      selectInput('plot1xvar', 'Plot 1 - X & Y Variables', plotvars,plotvars[1]),
      selectInput('plot1yvar', '', plotvars,plotvars[2])
   ),
   mainPanel()
)
server <- shinyServer(function(input,output){})
shinyApp(ui, server)

PS：我遇到了在下拉列表中修改字体大小，字体大小，在一个块中保留两个小部件（即display：inline-block）等的链接，但没有相关的链接。

Answer 1

这会删除标签并修改边距：

    String inputText = "Thu, 27 Oct 2016 18:17:47 GMT";
    SimpleDateFormat inputFormat = new SimpleDateFormat
        ("EEE MMM dd HH:mm:ss 'GMT' yyyy", Locale.US);
    inputFormat.setTimeZone(TimeZone.getTimeZone("Etc/UTC"));

    SimpleDateFormat outputFormat =
        new SimpleDateFormat("MMM dd, yyyy h:mm a");
    // Adjust locale and zone appropriately
    Date date = inputFormat.parse(inputText);
    String outputText = outputFormat.format(date);
    System.out.println(outputText);