Merge pull request #478 from mitchelloharawild/quickfix

Fixed series argument in autolayer.forecast
robjhyndman · Jan 12, 2017 · d80f620 · d80f620
2 parents fb2cb9e + a38512f
commit d80f620
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/ggplot.R b/R/ggplot.R
@@ -1276,10 +1276,10 @@ autolayer.forecast <- function(object, series = NULL, PI = TRUE, showgap = TRUE,
   data <- fortify(object, PI=PI, showgap=showgap)
   mapping <- ggplot2::aes_(x = ~x, y = ~y)
   if(!is.null(object$series)){
-    data <- transform(data, series=object$series)
+    data[["series"]] <- object$series
   }
   if(!is.null(series)){
-    data <- transform(data, series=series)
+    data[["series"]] <- series
     mapping$colour <- quote(series)
   }
   if(PI){