Положение панели инструментов ggplotly в блестящем приложении

Question

Используя приведенный ниже код, я могу создать свой график ggplotly. Как показано на рисунке ниже, панель инструментов ggplotly перекрывается с заголовком графика. Как я могу переместить панель инструментов в левую часть графика?

Кроме того, как я могу добавить пробел между заголовком и графиком? Я попытался сделать это, добавив «br ()», но это не сработало?

Мне было интересно, есть ли способ удалить «Графство» в поле, чтобы оно отображало только название округа (т.е. «Округ Аллен» отображается в поле вместо «Округ: Округ Аллен»).

      linedataPlot_60 <- reactive ({


     line_60 <- ggplot(linedata_60(),
           aes(
             x = Year,
             y = Percentage,
            # colour = interaction (County.y, Age_Group),
             colour = County

           )) + geom_line(size = 1)+ #ylim(0,30)+
      geom_point(size = 1.5,
                 shape = 21,
                 fill = "white" ) +   #scale_colour_manual(values=cbbPalette) +
      theme_bw() + #scale_y_continuous(breaks=seq(0,40,1)) +
      theme(legend.title=element_blank(),legend.text = element_text(face = "bold"), plot.title = element_text(
        hjust = 0.5,
        size = 9,
        colour = "Black",
        face = "bold"
      ),axis.text=(blue.bold.10.text), axis.title=blue.bold.10.text)+
      ggtitle(paste(
        input$sex_,
        "Older Population (60 or over) in the Selected Counties",

      "\n",
        "(2010 to 2050)"
      ))
       ggplotly(line_60) 

  })

  output$line_60 <- renderPlotly ({
    linedataPlot_60()
  })