CRAN Package Check Results for Package tsibble

Last updated on 2019-09-18 06:49:58 CEST.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 0.8.4 10.99 143.84 154.83 OK
r-devel-linux-x86_64-debian-gcc 0.8.4 9.19 109.80 118.99 OK
r-devel-linux-x86_64-fedora-clang 0.8.4 170.26 OK
r-devel-linux-x86_64-fedora-gcc 0.8.4 175.94 OK
r-devel-windows-ix86+x86_64 0.8.4 29.00 208.00 237.00 OK
r-patched-linux-x86_64 0.8.3 11.73 149.11 160.84 ERROR
r-patched-solaris-x86 0.8.4 284.20 OK
r-release-linux-x86_64 0.8.3 10.97 151.53 162.50 ERROR
r-release-windows-ix86+x86_64 0.8.3 23.00 221.00 244.00 ERROR
r-release-osx-x86_64 0.8.3 OK
r-oldrel-windows-ix86+x86_64 0.8.3 26.00 232.00 258.00 ERROR
r-oldrel-osx-x86_64 0.8.3 OK

Check Details

Version: 0.8.3
Check: examples
Result: ERROR
    Running examples in ‘tsibble-Ex.R’ failed
    The error most likely occurred in:
    
    > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
    > ### Name: slide2
    > ### Title: Sliding window calculation over multiple inputs simultaneously
    > ### Aliases: slide2 slide2_dfr slide2_dfc pslide pslide_dfr pslide_dfc
    > ### slide2_lgl slide2_chr slide2_int slide2_dbl pslide_lgl pslide_chr
    > ### pslide_int pslide_dbl
    >
    > ### ** Examples
    >
    > x <- 1:5
    > y <- 6:10
    > z <- 11:15
    > lst <- list(x = x, y = y, z = z)
    > df <- as.data.frame(lst)
    > slide2(x, y, sum, .size = 2)
    [[1]]
    [1] NA
    
    [[2]]
    [1] 16
    
    [[3]]
    [1] 20
    
    [[4]]
    [1] 24
    
    [[5]]
    [1] 28
    
    > slide2(lst, lst, ~., .size = 2)
    [[1]]
    [1] NA
    
    [[2]]
    [[2]]$x
    [1] 1 2 3 4 5
    
    [[2]]$y
    [1] 6 7 8 9 10
    
    
    [[3]]
    [[3]]$y
    [1] 6 7 8 9 10
    
    [[3]]$z
    [1] 11 12 13 14 15
    
    
    > slide2(df, df, ~., .size = 2)
    [[1]]
    [1] NA
    
    [[2]]
    [[2]]$x
    [1] 1 2 3 4 5
    
    [[2]]$y
    [1] 6 7 8 9 10
    
    
    [[3]]
    [[3]]$y
    [1] 6 7 8 9 10
    
    [[3]]$z
    [1] 11 12 13 14 15
    
    
    > pslide(lst, ~., .size = 1)
    [[1]]
    [1] 1
    
    [[2]]
    [1] 2
    
    [[3]]
    [1] 3
    
    [[4]]
    [1] 4
    
    [[5]]
    [1] 5
    
    > pslide(list(lst, lst), ~., .size = 2)
    [[1]]
    [1] NA
    
    [[2]]
    [[2]]$x
    [1] 1 2 3 4 5
    
    [[2]]$y
    [1] 6 7 8 9 10
    
    
    [[3]]
    [[3]]$y
    [1] 6 7 8 9 10
    
    [[3]]$z
    [1] 11 12 13 14 15
    
    
    >
    > ###
    > # row-wise sliding over data frame
    > ###
    >
    > library(tidyr)
    > library(dplyr)
    
    Attaching package: ‘dplyr’
    
    The following object is masked from ‘package:tsibble’:
    
     id
    
    The following objects are masked from ‘package:stats’:
    
     filter, lag
    
    The following objects are masked from ‘package:base’:
    
     intersect, setdiff, setequal, union
    
    > my_df <- data.frame(
    + group = rep(letters[1:2], each = 8),
    + x = c(1:8, 8:1),
    + y = 2 * c(1:8, 8:1) + rnorm(16),
    + date = rep(as.Date("2016-06-01") + 0:7, 2)
    + )
    >
    > slope <- function(...) {
    + data <- list(...)
    + fm <- lm(y ~ x, data = data)
    + coef(fm)[[2]]
    + }
    >
    > my_df %>%
    + group_by(group) %>%
    + nest() %>%
    + mutate(slope = purrr::map(data, ~ pslide_dbl(., slope, .size = 2))) %>%
    + unnest(slope)
    # A tibble: 16 x 3
    # Groups: group [2]
     group data slope
     <fct> <list<df[,3]>> <dbl>
     1 a [8 × 3] NA
     2 a [8 × 3] 2.81
     3 a [8 × 3] 0.981
     4 a [8 × 3] 4.43
     5 a [8 × 3] 0.734
     6 a [8 × 3] 0.850
     7 a [8 × 3] 3.31
     8 a [8 × 3] 2.25
     9 b [8 × 3] NA
    10 b [8 × 3] 2.88
    11 b [8 × 3] 0.183
    12 b [8 × 3] 3.12
    13 b [8 × 3] 3.01
    14 b [8 × 3] 3.59
    15 b [8 × 3] -1.34
    16 b [8 × 3] 3.17
    > ## window over 2 months
    > pedestrian %>%
    + filter(Sensor == "Southern Cross Station") %>%
    + index_by(yrmth = yearmonth(Date_Time)) %>%
    + nest() %>%
    + mutate(ma = slide_dbl(data, ~ mean(.$Count), .size = 2, .bind = TRUE))
    Error: `abs(.size)` (2) must not be larger than the length (1) of the input.
    Backtrace:
     █
     1. ├─`%>%`(...)
     2. │ ├─base::withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
     3. │ └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
     4. │ └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
     5. │ └─`_fseq`(`_lhs`)
     6. │ └─magrittr::freduce(value, `_function_list`)
     7. │ ├─base::withVisible(function_list[[k]](value))
     8. │ └─function_list[[k]](value)
     9. │ ├─dplyr::mutate(...)
     10. │ └─dplyr:::mutate.tbl_df(...)
     11. │ └─dplyr:::mutate_impl(.data, dots, caller_env())
     12. └─tsibble::slide_dbl(data, ~mean(.$Count), .size = 2, .bind = TRUE)
     13. └─tsibble::slider(.x, .size = .size, .step = .step, .bind = .bind)
    Execution halted
Flavors: r-patched-linux-x86_64, r-release-linux-x86_64

Version: 0.8.3
Check: tests
Result: ERROR
     Running ‘spelling.R’ [0s/1s]
     Running ‘testthat.R’ [38s/41s]
    Running the tests in ‘tests/testthat.R’ failed.
    Complete output:
     > library(rlang)
     > library(tibble)
     > library(lubridate)
    
     Attaching package: 'lubridate'
    
     The following object is masked from 'package:base':
    
     date
    
     > library(testthat)
    
     Attaching package: 'testthat'
    
     The following objects are masked from 'package:rlang':
    
     is_false, is_null, is_true
    
     > library(tsibble)
    
     Attaching package: 'tsibble'
    
     The following objects are masked from 'package:lubridate':
    
     interval, new_interval
    
     >
     > set.seed(2018)
     > test_check("tsibble")
     ── 1. Failure: nest() (@test-tidyr.R#99) ──────────────────────────────────────
     `nested_ped` inherits from `tbl_df/tbl/data.frame` not `lst_ts`.
    
     ── 2. Failure: dplyr verbs for lst_ts (@test-tidyr.R#201) ─────────────────────
     nest_t %>% select(data2 = data) inherits from `tbl_df/tbl/data.frame` not `lst_ts`.
    
     ══ testthat results ═══════════════════════════════════════════════════════════
     [ OK: 813 | SKIPPED: 3 | WARNINGS: 2 | FAILED: 2 ]
     1. Failure: nest() (@test-tidyr.R#99)
     2. Failure: dplyr verbs for lst_ts (@test-tidyr.R#201)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-patched-linux-x86_64

Version: 0.8.3
Check: tests
Result: ERROR
     Running ‘spelling.R’ [0s/0s]
     Running ‘testthat.R’ [37s/40s]
    Running the tests in ‘tests/testthat.R’ failed.
    Complete output:
     > library(rlang)
     > library(tibble)
     > library(lubridate)
    
     Attaching package: 'lubridate'
    
     The following object is masked from 'package:base':
    
     date
    
     > library(testthat)
    
     Attaching package: 'testthat'
    
     The following objects are masked from 'package:rlang':
    
     is_false, is_null, is_true
    
     > library(tsibble)
    
     Attaching package: 'tsibble'
    
     The following objects are masked from 'package:lubridate':
    
     interval, new_interval
    
     >
     > set.seed(2018)
     > test_check("tsibble")
     ── 1. Failure: nest() (@test-tidyr.R#99) ──────────────────────────────────────
     `nested_ped` inherits from `tbl_df/tbl/data.frame` not `lst_ts`.
    
     ── 2. Failure: dplyr verbs for lst_ts (@test-tidyr.R#201) ─────────────────────
     nest_t %>% select(data2 = data) inherits from `tbl_df/tbl/data.frame` not `lst_ts`.
    
     ══ testthat results ═══════════════════════════════════════════════════════════
     [ OK: 813 | SKIPPED: 3 | WARNINGS: 2 | FAILED: 2 ]
     1. Failure: nest() (@test-tidyr.R#99)
     2. Failure: dplyr verbs for lst_ts (@test-tidyr.R#201)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-release-linux-x86_64

Version: 0.8.3
Check: examples
Result: ERROR
    Running examples in 'tsibble-Ex.R' failed
    The error most likely occurred in:
    
    > ### Name: slide2
    > ### Title: Sliding window calculation over multiple inputs simultaneously
    > ### Aliases: slide2 slide2_dfr slide2_dfc pslide pslide_dfr pslide_dfc
    > ### slide2_lgl slide2_chr slide2_int slide2_dbl pslide_lgl pslide_chr
    > ### pslide_int pslide_dbl
    >
    > ### ** Examples
    >
    > x <- 1:5
    > y <- 6:10
    > z <- 11:15
    > lst <- list(x = x, y = y, z = z)
    > df <- as.data.frame(lst)
    > slide2(x, y, sum, .size = 2)
    [[1]]
    [1] NA
    
    [[2]]
    [1] 16
    
    [[3]]
    [1] 20
    
    [[4]]
    [1] 24
    
    [[5]]
    [1] 28
    
    > slide2(lst, lst, ~., .size = 2)
    [[1]]
    [1] NA
    
    [[2]]
    [[2]]$x
    [1] 1 2 3 4 5
    
    [[2]]$y
    [1] 6 7 8 9 10
    
    
    [[3]]
    [[3]]$y
    [1] 6 7 8 9 10
    
    [[3]]$z
    [1] 11 12 13 14 15
    
    
    > slide2(df, df, ~., .size = 2)
    [[1]]
    [1] NA
    
    [[2]]
    [[2]]$x
    [1] 1 2 3 4 5
    
    [[2]]$y
    [1] 6 7 8 9 10
    
    
    [[3]]
    [[3]]$y
    [1] 6 7 8 9 10
    
    [[3]]$z
    [1] 11 12 13 14 15
    
    
    > pslide(lst, ~., .size = 1)
    [[1]]
    [1] 1
    
    [[2]]
    [1] 2
    
    [[3]]
    [1] 3
    
    [[4]]
    [1] 4
    
    [[5]]
    [1] 5
    
    > pslide(list(lst, lst), ~., .size = 2)
    [[1]]
    [1] NA
    
    [[2]]
    [[2]]$x
    [1] 1 2 3 4 5
    
    [[2]]$y
    [1] 6 7 8 9 10
    
    
    [[3]]
    [[3]]$y
    [1] 6 7 8 9 10
    
    [[3]]$z
    [1] 11 12 13 14 15
    
    
    >
    > ###
    > # row-wise sliding over data frame
    > ###
    >
    > library(tidyr)
    > library(dplyr)
    
    Attaching package: 'dplyr'
    
    The following object is masked from 'package:tsibble':
    
     id
    
    The following objects are masked from 'package:stats':
    
     filter, lag
    
    The following objects are masked from 'package:base':
    
     intersect, setdiff, setequal, union
    
    > my_df <- data.frame(
    + group = rep(letters[1:2], each = 8),
    + x = c(1:8, 8:1),
    + y = 2 * c(1:8, 8:1) + rnorm(16),
    + date = rep(as.Date("2016-06-01") + 0:7, 2)
    + )
    >
    > slope <- function(...) {
    + data <- list(...)
    + fm <- lm(y ~ x, data = data)
    + coef(fm)[[2]]
    + }
    >
    > my_df %>%
    + group_by(group) %>%
    + nest() %>%
    + mutate(slope = purrr::map(data, ~ pslide_dbl(., slope, .size = 2))) %>%
    + unnest(slope)
    # A tibble: 16 x 3
    # Groups: group [2]
     group data slope
     <fct> <list<df[,3]>> <dbl>
     1 a [8 x 3] NA
     2 a [8 x 3] 2.81
     3 a [8 x 3] 0.981
     4 a [8 x 3] 4.43
     5 a [8 x 3] 0.734
     6 a [8 x 3] 0.850
     7 a [8 x 3] 3.31
     8 a [8 x 3] 2.25
     9 b [8 x 3] NA
    10 b [8 x 3] 2.88
    11 b [8 x 3] 0.183
    12 b [8 x 3] 3.12
    13 b [8 x 3] 3.01
    14 b [8 x 3] 3.59
    15 b [8 x 3] -1.34
    16 b [8 x 3] 3.17
    > ## window over 2 months
    > pedestrian %>%
    + filter(Sensor == "Southern Cross Station") %>%
    + index_by(yrmth = yearmonth(Date_Time)) %>%
    + nest() %>%
    + mutate(ma = slide_dbl(data, ~ mean(.$Count), .size = 2, .bind = TRUE))
    Error: `abs(.size)` (2) must not be larger than the length (1) of the input.
    Backtrace:
     x
     1. +-`%>%`(...)
     2. | +-base::withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
     3. | \-base::eval(quote(`_fseq`(`_lhs`)), env, env)
     4. | \-base::eval(quote(`_fseq`(`_lhs`)), env, env)
     5. | \-`_fseq`(`_lhs`)
     6. | \-magrittr::freduce(value, `_function_list`)
     7. | +-base::withVisible(function_list[[k]](value))
     8. | \-function_list[[k]](value)
     9. | +-dplyr::mutate(...)
     10. | \-dplyr:::mutate.tbl_df(...)
     11. | \-dplyr:::mutate_impl(.data, dots, caller_env())
     12. \-tsibble::slide_dbl(data, ~mean(.$Count), .size = 2, .bind = TRUE)
     13. \-tsibble::slider(.x, .size = .size, .step = .step, .bind = .bind)
    Execution halted
Flavors: r-release-windows-ix86+x86_64, r-oldrel-windows-ix86+x86_64

Version: 0.8.3
Check: tests
Result: ERROR
     Running 'spelling.R' [0s]
     Running 'testthat.R' [32s]
    Running the tests in 'tests/testthat.R' failed.
    Complete output:
     > library(rlang)
     > library(tibble)
     > library(lubridate)
    
     Attaching package: 'lubridate'
    
     The following object is masked from 'package:base':
    
     date
    
     > library(testthat)
    
     Attaching package: 'testthat'
    
     The following objects are masked from 'package:rlang':
    
     is_false, is_null, is_true
    
     > library(tsibble)
    
     Attaching package: 'tsibble'
    
     The following objects are masked from 'package:lubridate':
    
     interval, new_interval
    
     >
     > set.seed(2018)
     > test_check("tsibble")
     -- 1. Failure: nest() (@test-tidyr.R#99) --------------------------------------
     `nested_ped` inherits from `tbl_df/tbl/data.frame` not `lst_ts`.
    
     -- 2. Failure: dplyr verbs for lst_ts (@test-tidyr.R#201) ---------------------
     nest_t %>% select(data2 = data) inherits from `tbl_df/tbl/data.frame` not `lst_ts`.
    
     == testthat results ===========================================================
     [ OK: 813 | SKIPPED: 3 | WARNINGS: 2 | FAILED: 2 ]
     1. Failure: nest() (@test-tidyr.R#99)
     2. Failure: dplyr verbs for lst_ts (@test-tidyr.R#201)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-release-windows-ix86+x86_64

Version: 0.8.3
Check: tests
Result: ERROR
     Running 'spelling.R' [0s]
     Running 'testthat.R' [55s]
    Running the tests in 'tests/testthat.R' failed.
    Complete output:
     > library(rlang)
     > library(tibble)
     > library(lubridate)
    
     Attaching package: 'lubridate'
    
     The following object is masked from 'package:base':
    
     date
    
     > library(testthat)
    
     Attaching package: 'testthat'
    
     The following objects are masked from 'package:rlang':
    
     is_false, is_null, is_true
    
     > library(tsibble)
    
     Attaching package: 'tsibble'
    
     The following objects are masked from 'package:lubridate':
    
     interval, new_interval
    
     >
     > set.seed(2018)
     > test_check("tsibble")
     -- 1. Failure: nest() (@test-tidyr.R#99) --------------------------------------
     `nested_ped` inherits from `tbl_df/tbl/data.frame` not `lst_ts`.
    
     -- 2. Failure: dplyr verbs for lst_ts (@test-tidyr.R#201) ---------------------
     nest_t %>% select(data2 = data) inherits from `tbl_df/tbl/data.frame` not `lst_ts`.
    
     == testthat results ===========================================================
     [ OK: 813 | SKIPPED: 3 | WARNINGS: 2 | FAILED: 2 ]
     1. Failure: nest() (@test-tidyr.R#99)
     2. Failure: dplyr verbs for lst_ts (@test-tidyr.R#201)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-oldrel-windows-ix86+x86_64