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

Merge pull request #1461 from hadley/dplyr-1.0.0

Browse source 
dplyr 1.0.0 compatibility
This commit is contained in:
Sean J. Taylor 2020-04-28 18:02:10 -07:00 committed by GitHub
commit 3ccbd0e0e9
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
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/tests/testthat/test_prophet.R
View file

@ -6,12 +6,12 @@
library(prophet)
context("Prophet tests")
DATA <- read.csv('data.csv')
DATA <- read.csv(test_path('data.csv'))
N <- nrow(DATA)
train <- DATA[1:floor(N / 2), ]
future <- DATA[(ceiling(N/2) + 1):N, ]
DATA2 <- read.csv('data2.csv')
DATA2 <- read.csv(test_path('data2.csv'))
DATA$ds <- prophet:::set_date(DATA$ds)
DATA2$ds <- prophet:::set_date(DATA2$ds)
@ -623,6 +623,7 @@ test_that("conditional_custom_seasonality", {
out <- prophet:::make_all_seasonality_features(m, df)
#Confirm that only values without is_conditional_week has non zero entries
nonzero.weekly = out$seasonal.features %>%
dplyr::as_tibble() %>%
dplyr::select(dplyr::starts_with('conditional_weekly')) %>%
dplyr::mutate_all(~ . != 0) %>%
dplyr::mutate(nonzero = rowSums(. != 0) > 0) %>%