Highcharts export does not work on shinyapps.io

[Roy Francis]

I am using the Highcharts interactive graphs using rCharts in a shiny app. I noticed that the export (download) plot functionality does not function on shinyapps.io. When clicking, it produces a blank page and that's it. Then I need to refresh the page and the app restarts. But the same app on a server running shiny-server works fine. The plot is downloaded as a png image. It also works fine locally when the app is opened in a browser. Has anyone come across a similar issue?

Below is a screenshot of the export functionality within the highcharts plot.

Thanks.

[Tareef Kawaf]

I would guess that the URL being generated isn't being let through shinyapps.io properly. Would it be possible for you to hare a simple example that illustrates the problem with us so we can take a look at it please?

--
You received this message because you are subscribed to the Google Groups "ShinyApps Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email to shinyapps-use...@googlegroups.com.
To post to this group, send email to shinyap...@googlegroups.com.
To view this discussion on the web visit https://groups.google.com/d/msgid/shinyapps-users/0217fd1a-3067-4dea-b17d-7f08ba66a138%40googlegroups.com.
For more options, visit https://groups.google.com/d/optout.

[Roy Francis]

Here is a reproducible example:

 

## ui.R
library(rCharts)
shinyUI(
  fluidPage(
  headerPanel("rCharts: Export issue"),
  helpText("Export options work locally and on shiny-server but fails to work on shinyapps.io."),
  tags$br(),
    showOutput("myChart", "highcharts"),
    tags$br(),
    #includeMarkdown("info.md")
    verbatimTextOutput("display")
))

## server.r

library(rCharts)

shinyServer(function(input, output) {

  output$myChart <- renderChart({

    data(iris)

    is <- iris[c(1:10,51:60,101:110),]

    is$Species <- factor(as.character(is$Species))

    p1 <- rCharts::hPlot(x="Species", y="Sepal.Length", data = is, color = "Species", type = 'bar')

    p1$addParams(dom = 'myChart')

    p1$exporting(enabled=T,

                buttons=list(

                  contextButton = list(

                    align = 'left',

                    verticalAlign = 'top'

                  )

                ))

    p1$chart(zoomType='x',

            height=500,

            width=800)

    return(p1)

  })

  

  output$display <- renderText({

    paste0(capture.output(sessionInfo()),"\n")

  })

})

 

And here is this code on my shinyapps page. This link is temporary.

https://roymf.shinyapps.io/issue-rcharts-export/

[Tareef Kawaf]

I am not an expert, but it looks like the issue is that highcharts is requesting the download over http whereas the rest of the page is served over https.  I wonder if that is an option in highcharts which would allow you to specify that you only want the downloads to occur over https.  

I found the issue by looking at the javascript console before clicking on "Download PNG".  You can see that the browser is rejecting the request outright so it is never making it to shinyapps.io.

-Tareef

--

You received this message because you are subscribed to the Google Groups "ShinyApps Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email to shinyapps-use...@googlegroups.com.
To post to this group, send email to shinyap...@googlegroups.com.

To view this discussion on the web visit https://groups.google.com/d/msgid/shinyapps-users/e5d0520f-aff9-4113-9ef4-31b084352d30%40googlegroups.com.

[Robin Sheridan]

Hi guys, 

Having the same issue. It looks as if the export feature works fine on a mac (running chrome). But I get the same issue when trying to export on my windows work machine (also running chrome). No error messages, and I can't find anything in the logs from shinyapps either (although this is not surprising, as its a browser issue probably). 

Any ideas? 

R

[Andy Kipp]

Is there anything in the Javascript console?

To view this discussion on the web visit https://groups.google.com/d/msgid/shinyapps-users/686f0426-7c8a-4d0e-97f5-3b27132a203e%40googlegroups.com.

[Roy Francis]

Mixed Content: The page at 'https://website/' was loaded over a secure connection, but contains a form which targets an insecure endpoint 'http://export.highcharts.com/'. This endpoint should be made available over a secure connection.

Unfortunately, Highcharts does not support exporting over https.

http://stackoverflow.com/questions/16853818/highcharts-exporting-over-https

Roy 

[Andy Kipp]

:-(

It it possible to use the workaround that was suggested?

--

You received this message because you are subscribed to the Google Groups "ShinyApps Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email to shinyapps-use...@googlegroups.com.
To post to this group, send email to shinyap...@googlegroups.com.

To view this discussion on the web visit https://groups.google.com/d/msgid/shinyapps-users/1d038b8f-10b5-4221-9f24-ebcf3ea445c8%40googlegroups.com.

[Roy Francis]

The two suggested options are: to create a custom server (which I think is too complicated) and to use client-side export.

http://www.highcharts.com/docs/export-module/client-side-export

I tried setting fallbackToExportServer=FALSE

http://api.highcharts.com/highcharts#exporting.fallbackToExportServer

but I don't think it changed much.

I also noticed that it works sometimes and crashes other times. It's not entirely consistent.

Roy

[Mark Riseley]

I got this to work in my apps by declaring the normal exporting url as https eg:

p1$exporting(enabled = TRUE, url = 'https://export.highcharts.com', ...

)