saymrwulf/prophet
1
0
Fork 0
mirror of https://github.com/saymrwulf/prophet.git synced 2026-09-15 22:10:22 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Warning messages for seasonality

Browse source
This commit is contained in:
Sean J. Taylor 2017-04-17 16:55:25 -07:00
parent b98ec17668
commit c2b9f6229f
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
R/R/prophet.R
View file

@ -416,6 +416,8 @@ set_auto_seasonalities <- function(m) {
last <- max(m$history$ds) last <- max(m$history$ds)
if (m$yearly.seasonality == 'auto') { if (m$yearly.seasonality == 'auto') {
if (last - first < 730) { if (last - first < 730) {
warn('Disabling yearly seasonality. ',
'Run prophet with `yearly.seasonality=TRUE` to override this.')
m$yearly.seasonality <- FALSE m$yearly.seasonality <- FALSE
} else { } else {
m$yearly.seasonality <- TRUE m$yearly.seasonality <- TRUE
@ -425,6 +427,8 @@ set_auto_seasonalities <- function(m) {
dt <- diff(m$history$ds) dt <- diff(m$history$ds)
min.dt <- min(dt[dt > 0]) min.dt <- min(dt[dt > 0])
if ((last - first < 14) || (min.dt >= 7)) { if ((last - first < 14) || (min.dt >= 7)) {
warning('Disabling weekly seasonality. ',
'Run prophet with `weekly.seasonality=TRUE` to override this.')
m$weekly.seasonality <- FALSE m$weekly.seasonality <- FALSE
} else { } else {
m$weekly.seasonality <- TRUE m$weekly.seasonality <- TRUE