Huge top/bottom margin

[fabiangehring]

The margin at top and bottom are quite big. Especially when resizing the window's width total height of the bubble plot does not seem to resize accordingly.

@jcheng5: Is there an easy fix with css or does this need to be fixed within the package?

mre (here: fixedPage):

server:

library(shiny)
library(bubbles)

shinyServer(function(input, output) {

  output$distPlot <- renderBubbles({
    bubbles(value = runif(input$bins), label = 1:input$bins,
            color = rainbow(input$bins, alpha=NULL)[sample(input$bins)]
    )
  })

})

ui

library(shiny)
library(bubbles)

shinyUI(
  fixedPage(
    fixedRow(
      column(3, sliderInput("bins",
                            "Number of bins:",
                            min = 1,
                            max = 50,
                            value = 30)),
      column(9, 
             wellPanel(  
               bubblesOutput("distPlot", width = "100%", height = "100%")
             )
      )
    )
  )
)