Search icon CANCEL
Subscription
0
Cart icon
Your Cart (0 item)
Close icon
You have no products in your basket yet
Arrow left icon
Explore Products
Best Sellers
New Releases
Books
Videos
Audiobooks
Learning Hub
Free Learning
Arrow right icon
Arrow up icon
GO TO TOP
Web Application Development with R Using Shiny Second Edition

You're reading from   Web Application Development with R Using Shiny Second Edition Integrate the power of R with the simplicity of Shiny to deliver cutting-edge analytics over the Web

Arrow left icon
Product type Paperback
Published in Jan 2016
Publisher Packt
ISBN-13 9781782174349
Length 194 pages
Edition 2nd Edition
Languages
Tools
Arrow right icon
Author (1):
Arrow left icon
Chris Beeley Chris Beeley
Author Profile Icon Chris Beeley
Chris Beeley
Arrow right icon
View More author details
Toc

Table of Contents (9) Chapters Close

Preface 1. Getting Started with R and Shiny! FREE CHAPTER 2. Building Your First Application 3. Building Your Own Web Pages with Shiny 4. Taking Control of Reactivity, Inputs, and Outputs 5. Advanced Applications I – Dashboards 6. Advanced Applications II – Using JavaScript Libraries in Shiny Applications 7. Sharing Your Creations Index

Dygraphs with a prediction

Although we've already looked at dygraphs, it's worth looking at it again, so we can see how to build a prediction in the final plot. This is quite simple to do, and the particular prediction statistics that we will use here has few assumptions about the data and can be used in most contexts. Before we take a look at the code, let's take a look at the final application:

Dygraphs with a prediction

As you can see, the graph contains the actual data as well as a prediction of how the data might look over the next few years. The blue shading indicates prediction intervals, which give us an idea of the reliability of the projection. Let's now turn our attention to the code to produce this plot:

output$predictSeries <- renderDygraph({

Again, the graph is produced using the special renderDygraph() function.

  theSeries <- group_by(passData(), yearmon) %>%
  summarise(meanSession = mean(sessionDuration, na.rm = TRUE),
    users = sum(users), sessions = sum(sessions)
  ...
lock icon The rest of the chapter is locked
Register for a free Packt account to unlock a world of extra content!
A free Packt account unlocks extra newsletters, articles, discounted offers, and much more. Start advancing your knowledge today.
Unlock this book and the full library FREE for 7 days
Get unlimited access to 7000+ expert-authored eBooks and videos courses covering every tech area you can think of
Renews at $19.99/month. Cancel anytime
Banner background image