2017-02-27 5 views
2

Ich bin nach dem Tutorial Dygraph:hinzufügen Vorhersage von

https://rstudio.github.io/dygraphs/

Sie zeigen am unteren Rand eine Vorhersage und ich möchte es auf die ursprüngliche Zeitreihe Graph hinzuzufügen. So unten ist der Code, und ich bin nicht sicher, wie die beiden zu kombinieren:

install.packages("dygraphs") 
library(dygraphs) 
library(forecast) 
library(dplyr) 

dygraph(ldeaths) 

enter image description here

Dann machte ich eine Vorhersage:

hw <- HoltWinters(ldeaths) 
predicted <- predict(hw, n.ahead = 72, prediction.interval = TRUE) 

dygraph(predicted, main = "Predicted Lung Deaths (UK)") %>% 
    dyAxis("x", drawGrid = FALSE) %>% 
    dySeries(c("lwr", "fit", "upr"), label = "Deaths") %>% 
    dyOptions(colors = RColorBrewer::brewer.pal(3, "Set1")) 

enter image description here

Wie kann ich kombinieren die zwei in einem Diagramm?

Antwort

2

Scheint diese Bibliothek erfordert, dass Sie die Daten kombinieren und dann separate Serie "Ebenen" zum Plot hinzufügen. Mit Ihrem Beispiel könnten Sie dies tun:

# combine the time series actual and forcasted values 
combined <- cbind(predicted, actual=ldeaths) 

# plot the different values as different series  
dygraph(combined , main = "Predicted Lung Deaths (UK)") %>% 
    dyAxis("x", drawGrid = FALSE) %>% 
    dySeries("actual", label = "actual") %>% 
    dySeries(paste0("predicted.", c("lwr", "fit", "upr")), label = "Predicted") %>% 
    dyOptions(colors = RColorBrewer::brewer.pal(3, "Set1")) 

enter image description here

+0

Danke, das hat super funktioniert –

+0

eine Chance, Sie können dies auch zu $ ​​Währung ändern? –

+0

Auf meinem System (Mac liest mit Chrome) erscheinen die Achsen, Titel und Legende aber keine Linien oder Flächen .... alles weißer Hintergrund. Meine Versionen sind per CRAN up-to-date. –