How to place box title and Info box next to each other in shiny using CSS

Question

I have shiny application with box in the body as shown below:

library(shiny)
library(shinydashboard)
body <- dashboardBody(
  fluidRow(box(
                  title = "My header1",
                  id = "box1", solidHeader = TRUE,
                  infoBox(title = "My header2", value = NULL,
                             icon = shiny::icon("calendar"),width = 12,
                                   href = NULL)                 
  )
  
  ))

shinyApp(
  ui = dashboardPage(
    dashboardHeader(title = "Boxes"),
    dashboardSidebar(),
    body
  ),
  server = function(input, output) {
  }
)

How can i place the infoBox() next to the box title "My header1" ? so that they are in the same line as indicated below?

so that it looks like: