{shinydisconnect}: Show a nice message when a Shiny app disconnects or errors

[This article was first published on Dean Attali's R Blog, and kindly contributed to R-bloggers]. (You can report issue about the content on this page here)
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

Have you ever noticed how an error in your Shiny app looks very different when it happens locally (in RStudio on your laptop) compared to when it happens in production (in shinyapps.io or Shiny Server or Connect)? Locally, when a Shiny app breaks, you just get a grey screen. But when a deployed app breaks, you also get a little strip that says “Disconnected from server. Reload.”

shiny default message

You don’t have any control over that message’s text or position, and you don’t have a way to get that message to appear both locally and in deployed apps.

Well, at least you didn’t until now. The new {shinydisconnect} package solves exactly these two issues, by allowing you to show a customized (and pretty!) message when a Shiny app disconnects or errors, regardless of where the app is running.

You can visit the GitHub page or check out a demo online:

Table of contents

Background

When I created CRANalerts a few years ago, I wanted to make it look beautiful and not at all like a Shiny app. After investing a lot of time on making it look great, there was still one last thing I wasn’t happy about: that dreadful “Disconnected from server” message. It didn’t show up when I was developing the app locally, and it wasn’t really part of the shiny app – it’s actually the shiny server that creates it. It was just so ugly and not user-friendly.

I searched the internet for a solution, and there was none. There were other people asking for solutions, but none offered. I couldn’t just let it go, and after many anxious hours of thinking I may have to settle for something I don’t like, I eventually found a way to customize it. Behold the customized Shiny error message!

shinydisconnect simple look

Ever since then I’ve used this trick in every shiny app I wrote. And a couple months ago I finally took the time to make a proper package out of it so that everybody could benefit from it.

Overview

A Shiny app can disconnect for a variety of reasons: an unrecoverable error occurred in the app, the server went down, the user lost internet connection, or any other reason that might cause the shiny app to lose connection to its server.

{shinydisconnect} allows you to add a nice message to the user when the app disconnects. The message works both locally (running Shiny apps within RStudio) and on Shiny servers (such as shinyapps.io, RStudio Connect, Shiny Server Open Source, Shiny Server Pro). See the demo Shiny app online for examples.

Examples

For interactive examples and to see all the features, check out the demo app.

Example 1: basic usage (code)

basic screenshot

Example 2: using parameters (code)

advanced screenshot

Example 3: full-width and vertically centered (code)

You can also use disconnectMessage2() to get a similar message box to this one.

special screenshot

Example 4: hide the app

This can be achieved by setting the opacity to 1 (fully opaque).

special screenshot

How to use

The package only has two functions: disconnectMessage() and disconnectMessage2().

Call disconnectMessage() anywhere in a Shiny app’s UI to add a nice message when a shiny app disconnects. disconnectMessage() has many parameters to modify the text, position, and colours of the disconnect message.

Note that it’s not possible to distinguish between errors and timeouts – they will both show the same message.

Without using this package, a shiny app that disconnects will either just show a greyed out screen if running locally (with no message), or will show a small message in the bottom-left corner that you cannot modify when running in a server.

Basic usage:

ui <- fluidPage(
  disconnectMessage(),
  actionButton("disconnect", "Disconnect the app")
)
server <- function(input, output, session) {
  observeEvent(input$disconnect, {
    session$close()
  })
}
shinyApp(ui, server)

You can use disconnectMessage2() as a pre-configured version of disconnectMessage() with a specific set of parameters.

To leave a comment for the author, please follow the link and comment on their blog: Dean Attali's R Blog.

R-bloggers.com offers daily e-mail updates about R news and tutorials about learning R and many other topics. Click here if you're looking to post or find an R/data-science job.
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

Never miss an update!
Subscribe to R-bloggers to receive
e-mails with the latest R posts.
(You will not see this message again.)

Click here to close (This popup will not appear again)