如何删除 Shiny 应用程序中多余的灰色间距

Question

根据下面的代码，它基本上在 Shiny 应用程序中显示了一个

HTML

文件，我怎样才能删除信息图上方和下方的额外灰色空间？

library(shiny)
library(shinydashboard)

ui = fluidPage(
  navbarPage(htmlOutput("infographic"),
  )
)

server <- function(input,output){
  output$infographic <- renderUI({
    tags$iframe(seamless="seamless", 
                src= "Hub_Infographic.html",
                width=1080, 
                height=1024)
  })
}



shinyApp(ui, server)

应用输出：

期望的输出（通过在浏览器中打开 HTML 文件显示）：