-
Notifications
You must be signed in to change notification settings - Fork 648
Description
Hello ramnathv,
I would deeply appreciate if you can give me some hints about what could be happening here.
I've been trying to make a radar plot using rCharts::Highcharts. While it is generated without problems within an rstudio session, once I try to render it within the mainPanel inside a shiny app it just shows the figure legend and anything else. I've been already playing around with the width and height and nothing seems to work. Only the legend is displayed.
This is how the code looks:
ui <- fluidPage(theme = shinytheme("cosmo"),
navbarPage(tabPanel("Radar plot",
sidebarLayout(
mainPanel(
h1("Radar plot"),
showOutput("radarplot", "highcharts")%>% withSpinner(color="#0dc5c1"),
) # mainPanel
)
)
)
) # fluidPage
server <- function(input, output, session) {
output$radarplot <- renderChart2({
plotS <- rCharts::Highcharts$new()
plotS$chart(polar = TRUE, type = "line", width=700, height=700)
plotS$xAxis(categories=df$names, tickmarkPlacement= 'on', lineWidth= 0)
plotS$yAxis(gridLineInterpolation= 'circle', lineWidth= 0, min= -1.0,
max=1.0,endOnTick=T,tickInterval=0.1)
plotS$series(data = df[,2],name = "some name", pointPlacement="on", color="black")
plotS$exporting(enabled = T)
plotS$addParams(dom = 'Highcharts')
return(plotS)
})
} # end of server
What am I doing wrong here?
Thank you very much for any input on this issue.
Best,
Lina.