При составлении прогнозов в пакетном режиме как можно указать название серии для легенды?
Я пытаюсь:
require('fpp2')
sim <- bld.mbb.bootstrap(debitcards, 10) %>%
as.data.frame() %>%
ts(frequency=12, start=2000)
fc <- purrr::map(as.list(sim),
function(x){forecast(ets(x))[["mean"]]}) %>%
as.data.frame() %>%
ts(frequency=12, start=start)
autoplot(debitcards) +
autolayer(sim, colour=TRUE) +
autolayer(fc, colour=TRUE) +
autolayer(debitcards, colour=FALSE) +
ylab("Bootstrapped series")
В результате получается легенда.Выводимая им ошибка говорит:
Для многомерных временных рядов укажите имя серии для каждой временной серии.По умолчанию используются имена столбцов.
Я попытался указать серию следующим образом:
sim <- bld.mbb.bootstrap(debitcards, 10) %>%
as.data.frame() %>%
ts(frequency=12, start=2000)
fc <- purrr::map(as.list(sim),
function(x){forecast(ets(x))[["mean"]]}) %>%
as.data.frame() %>%
ts(frequency=12, start=start)
autoplot(debitcards, series="observed data") +
autolayer(sim, colour=TRUE, series="series name") +
autolayer(fc, colour=TRUE, series="series name2") +
autolayer(debitcards, colour=FALSE, series="observed data") +
ylab("Bootstrapped series")
Но по-прежнему используется имя столбца, что приводит к значению легенды длякаждая серия начальной загрузки.
Как добавить легенду при начальной загрузке и использовании данных многомерного временного ряда?