Delete gap between Charts in Plotly

I config the chart’s size in shiny but still have blank area between charts
they show like old area before config height&width


this is my code

plot1_reactive <- eventReactive(input$submit_but,{
      xaxis <- list(
                    tickformat = "%-d/%-m/%Y",
                    type='category'
                    )
      yaxis <- list(title = input$sel_par1)
      r <- plot_ly(mydata,x=date,y = a , type = 'scatter', mode = 'lines+markers'
                   , width = 950, height = 200,line = list(shape = "linear"))%>%
      layout(xaxis = xaxis, yaxis = yaxis) 

    })
    plot2_reactive <- eventReactive(input$submit_but,{
      xaxis <- list(
                    tickformat = "%-d/%-m/%Y",
                    type='category')
      yaxis <- list(title = input$sel_par2)
      r <- plot_ly(mydata,x=date,y = b , type = 'scatter', mode = 'lines+markers'
                   , width = 950, height = 200,line = list(shape = "linear"))%>%
        layout(autosize = F,xaxis = xaxis, yaxis = yaxis)  
    })

For future readers: same question on SO.