saymrwulf/prophet
1
0
Fork 0
mirror of https://github.com/saymrwulf/prophet.git synced 2026-05-16 21:00:16 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Apply colnames *before* coercing to a tbl_df (#739)

Browse source 
`dplyr::as_data_frame()` is really `tibble::as_tibble()`. An upcoming
release of tibble will be stricter about column names and, by default,
you can't have duplicate column names. This change allows prophet to
work with current CRAN tibble (v1.4.2) and the coming release.

cc @krlmlr
This commit is contained in:
Jennifer (Jenny) Bryan 2018-11-21 09:34:17 -08:00 committed by Ben Letham
parent 40afef26b4
commit ebf7b3da0a
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
R/R/prophet.R
View file

@ -1440,11 +1440,12 @@ predict_uncertainty <- function(m, df) {
na.rm = TRUE)),
t(apply(t(sim.values$trend), 2, stats::quantile, c(lower.p, upper.p),
na.rm = TRUE))
) %>% dplyr::as_data_frame()
)
colnames(intervals) <- paste(rep(c('yhat', 'trend'), each=2),
c('lower', 'upper'), sep = "_")
return(intervals)
return(dplyr::as_data_frame(intervals))
}
#' Simulate observations from the extrapolated generative model.