Dimensões mínimas do browser/viewport

dúvidas
1

Olá pessoal,

Estou tentando definir dimensões mínimas para o navegador/viewport. Já ajustei as dimensões mínimas para a página HTML usando CSS, mas não consegui definir um min-width para o navegador/viewport.

No meu PC, o Google Chrome parece ter um min-width de 500px, mas não consegui identificar o elemento responsável por essa característica.

Segue o código:

library(shiny)

# Defina o UI do aplicativo
ui <- fluidPage(
  # Adicione o CSS personalizado para limitar o tamanho do viewport
  tags$head(
    tags$meta(name = "viewport", content = "width=device-width, initial-scale=1.0"),
    tags$style(HTML("
      html, body, #appContainer {
        min-width: 800px;
        height: 100vh; /* Usa a altura total da viewport */
        min-width: 800px; /* Define a largura mínima */
        min-height: 600px; /* Define a altura mínima */
        overflow: hidden; /* Remove as barras de rolagem */
        margin: 0;
        padding: 0;
      }

      #content {
        width: 100%;
        max-width: 1200px; /* Define a largura máxima */
        height: 100%;
        max-height: 800px; /* Define a altura máxima */
        margin: auto; /* Centraliza o conteúdo */
        border: 1px solid #000; /* Opcional: adicionar uma borda para visualização */
        overflow: auto;
      }
    "))
  ),
  
  # Conteúdo do aplicativo
  div(id = "appContainer",
      div(id = "content",
          h1("Aplicativo Shiny com Tamanho Limitado"),
          p("Este é um exemplo de como limitar o tamanho do viewport em um aplicativo Shiny usando CSS."),
          plotOutput("examplePlot")
      )
  )
)

# Defina o servidor do aplicativo
server <- function(input, output, session) {
  output$examplePlot <- renderPlot({
    plot(cars)
  })
}

# Execute o aplicativo
shinyApp(ui, server)