You can change the default background color for the leaflet using CSS, see this related question .
You can use custom CSS in your Shiny application by adding it to the Shiny HTML output header:
ui <- fluidPage(
tags$head(
tags$style(HTML(".leaflet-container { background: #f00; }"))
),
)
, , CSS, Shiny documentation.