Shiny nivocal not rendering

[timelyportfolio]

@jienagu reported on Slack that a simple nivocal Shiny example does not work.

library(shiny)
library(nivocal)

ui <- nivocalOutput("nv", height = 200)

server <- function(input, output, session) {
  output$nv <- renderNivocal({
    # fake data of 500 records/days starting 2017-03-15
    df <- data.frame(
      day = seq.Date(
        from = as.Date("2017-03-15"),
        length.out = 500,
        by = "days"
      ),
      value = round(runif(500)*1000, 0)
    )
    
    nivocal(df)
  })
}

shinyApp(ui, server)

[timelyportfolio]

height and width were not being passed through the style attribute. Even though the render appears to work, we see a blank screen, since height is 0. react-R/nivocal@36d97b1 fixes nivocal and #21 will be a more permanent universal fix by repairing the template.