CRAN Package Check Results for Package tidyquant

Last updated on 2017-07-31 01:47:29.

Check Details

Version: 0.5.2
Check: dependencies in R code
Result: NOTE
    Namespaces in Imports field not imported from:
     ‘broom’ ‘curl’ ‘devtools’ ‘rvest’ ‘timeSeries’ ‘tseries’ ‘zoo’
     All declared Imports should be used.
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-patched-solaris-x86, r-release-osx-x86_64

Version: 0.5.1
Check: tests
Result: ERROR
     Running ‘testthat.R’ [19s/51s]
    Running the tests in ‘tests/testthat.R’ failed.
    Complete output:
     > library(testthat)
     > library(tidyquant)
     Loading required package: lubridate
    
     Attaching package: 'lubridate'
    
     The following object is masked from 'package:base':
    
     date
    
     Loading required package: PerformanceAnalytics
     Loading required package: xts
     Loading required package: zoo
    
     Attaching package: 'zoo'
    
     The following objects are masked from 'package:base':
    
     as.Date, as.Date.numeric
    
    
     Attaching package: 'PerformanceAnalytics'
    
     The following object is masked from 'package:graphics':
    
     legend
    
     Loading required package: quantmod
     Loading required package: TTR
     Version 0.4-0 included new data defaults. See ?getSymbols.
     Loading required package: tidyverse
     Loading tidyverse: ggplot2
     Loading tidyverse: tibble
     Loading tidyverse: tidyr
     Loading tidyverse: readr
     Loading tidyverse: purrr
     Loading tidyverse: dplyr
     Conflicts with tidy packages ---------------------------------------------------
     as.difftime(): lubridate, base
     date(): lubridate, base
     filter(): dplyr, stats
     first(): dplyr, xts
     intersect(): lubridate, base
     is_null(): purrr, testthat
     lag(): dplyr, stats
     last(): dplyr, xts
     matches(): dplyr, testthat
     setdiff(): lubridate, base
     union(): lubridate, base
    
     Attaching package: 'tidyquant'
    
     The following object is masked from 'package:dplyr':
    
     as_tibble
    
     The following object is masked from 'package:tibble':
    
     as_tibble
    
     >
     > test_check("tidyquant")
     'getSymbols' currently uses auto.assign=TRUE by default, but will
     use auto.assign=FALSE in 0.5-0. You will still be able to use
     'loadSymbols' to automatically load data. getOption("getSymbols.env")
     and getOption("getSymbols.auto.assign") will still be checked for
     alternate defaults.
    
     This message is shown once per session and may be disabled by setting
     options("getSymbols.warning4.0"=FALSE). See ?getSymbols for details.
    
     WARNING: There have been significant changes to Yahoo Finance data.
     Please see the Warning section of '?getSymbols.yahoo' for details.
    
     This message is shown once per session and may be disabled by setting
     options("getSymbols.yahoo.warning"=FALSE).
     1. Error: Test prints warning message on invalid x input. (@test_tq_get_dividends.R#23)
     'dimnames' applied to non-array
     1: expect_warning(tq_get("XYZ", get = get)) at testthat/test_tq_get_dividends.R:23
     2: capture_warnings(object)
     3: withCallingHandlers(code, warning = function(condition) {
     out$push(condition)
     invokeRestart("muffleWarning")
     })
     4: tq_get("XYZ", get = get)
     5: tq_get_base(x, get, complete_cases = complete_cases, map = FALSE, ...)
     6: tq_get_util_1(x, get, ...)
     7: ret %>% tidyquant::as_tibble(preserve_row_names = TRUE) %>% dplyr::rename(date = row.names) %>%
     dplyr::mutate(date = lubridate::as_date(date))
     8: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
     9: eval(quote(`_fseq`(`_lhs`)), env, env)
     10: eval(quote(`_fseq`(`_lhs`)), env, env)
     11: `_fseq`(`_lhs`)
     12: freduce(value, `_function_list`)
     13: function_list[[i]](value)
     14: tidyquant::as_tibble(., preserve_row_names = TRUE)
     15: tryCatch({
     if (xts::is.xts(x) || zoo::is.zoo(x) || timeSeries::is.timeSeries(x) || stats::is.ts(x)) {
     matrix_to_tibble(as.matrix(x), preserve_row_names, ...)
     }
     else if (tseries::is.irts(x)) {
     matrix_to_tibble(x %>% xts::as.xts() %>% as.matrix(), preserve_row_names,
     ...)
     }
     else if (is.matrix(x)) {
     matrix_to_tibble(x, preserve_row_names, ...)
     }
     else {
     if (preserve_row_names)
     warn <- TRUE
     tibble::as_tibble(x, ...)
     }
     }, error = function(e) {
     warning(paste0("Error at ", x, ": Could not convert to tibble. Check input."))
     NA
     })
     16: tryCatchList(expr, classes, parentenv, handlers)
     17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     18: value[[3L]](cond)
     19: warning(paste0("Error at ", x, ": Could not convert to tibble. Check input."))
     20: paste0("Error at ", x, ": Could not convert to tibble. Check input.")
     21: as.character(structure(logical(0), .Dim = 0:1, index = structure(numeric(0), tzone = "UTC", tclass = "Date"), .indexCLASS = "Date", tclass = "Date", .indexTZ = "UTC", tzone = "UTC", .Dimnames = list(
     NULL, "dividends"), class = c("xts", "zoo")))
     22: as.character.default(structure(logical(0), .Dim = 0:1, index = structure(numeric(0), tzone = "UTC", tclass = "Date"), .indexCLASS = "Date", tclass = "Date", .indexTZ = "UTC", tzone = "UTC", .Dimnames = list(
     NULL, "dividends"), class = c("xts", "zoo")))
     23: as.vector(x, "character")
     24: as.vector.zoo(x, "character")
     25: as.vector(as.matrix(x), mode = mode)
     26: as.matrix(x)
     27: as.matrix.xts(x)
    
     2. Error: Test returns NA on invalid x input. (@test_tq_get_dividends.R#27) ----
     'dimnames' applied to non-array
     1: expect_equal(suppressWarnings(tq_get("XYZ", get = get)), NA) at testthat/test_tq_get_dividends.R:27
     2: compare(object, expected, ...)
     3: suppressWarnings(tq_get("XYZ", get = get))
     4: withCallingHandlers(expr, warning = function(w) invokeRestart("muffleWarning"))
     5: tq_get("XYZ", get = get)
     6: tq_get_base(x, get, complete_cases = complete_cases, map = FALSE, ...)
     7: tq_get_util_1(x, get, ...)
     8: ret %>% tidyquant::as_tibble(preserve_row_names = TRUE) %>% dplyr::rename(date = row.names) %>%
     dplyr::mutate(date = lubridate::as_date(date))
     9: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
     10: eval(quote(`_fseq`(`_lhs`)), env, env)
     11: eval(quote(`_fseq`(`_lhs`)), env, env)
     12: `_fseq`(`_lhs`)
     13: freduce(value, `_function_list`)
     14: function_list[[i]](value)
     15: tidyquant::as_tibble(., preserve_row_names = TRUE)
     16: tryCatch({
     if (xts::is.xts(x) || zoo::is.zoo(x) || timeSeries::is.timeSeries(x) || stats::is.ts(x)) {
     matrix_to_tibble(as.matrix(x), preserve_row_names, ...)
     }
     else if (tseries::is.irts(x)) {
     matrix_to_tibble(x %>% xts::as.xts() %>% as.matrix(), preserve_row_names,
     ...)
     }
     else if (is.matrix(x)) {
     matrix_to_tibble(x, preserve_row_names, ...)
     }
     else {
     if (preserve_row_names)
     warn <- TRUE
     tibble::as_tibble(x, ...)
     }
     }, error = function(e) {
     warning(paste0("Error at ", x, ": Could not convert to tibble. Check input."))
     NA
     })
     17: tryCatchList(expr, classes, parentenv, handlers)
     18: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     19: value[[3L]](cond)
     20: warning(paste0("Error at ", x, ": Could not convert to tibble. Check input."))
     21: paste0("Error at ", x, ": Could not convert to tibble. Check input.")
     22: as.character(structure(logical(0), .Dim = 0:1, index = structure(numeric(0), tzone = "UTC", tclass = "Date"), .indexCLASS = "Date", tclass = "Date", .indexTZ = "UTC", tzone = "UTC", .Dimnames = list(
     NULL, "dividends"), class = c("xts", "zoo")))
     23: as.character.default(structure(logical(0), .Dim = 0:1, index = structure(numeric(0), tzone = "UTC", tclass = "Date"), .indexCLASS = "Date", tclass = "Date", .indexTZ = "UTC", tzone = "UTC", .Dimnames = list(
     NULL, "dividends"), class = c("xts", "zoo")))
     24: as.vector(x, "character")
     25: as.vector.zoo(x, "character")
     26: as.vector(as.matrix(x), mode = mode)
     27: as.matrix(x)
     28: as.matrix.xts(x)
    
     3. Failure: Test returns tibble with correct rows and columns. (@test_tq_get_exchange_rates.R#25)
     nrow(test1) not equal to 91.
     1/1 mismatches
     [1] 64 - 91 == -27
    
    
     4. Failure: Test returns tibble with correct rows and columns. (@test_tq_get_metal_prices.R#26)
     nrow(test1) not equal to 91.
     1/1 mismatches
     [1] 64 - 91 == -27
    
    
     5. Failure: Test prints warning message on invalid x input. (@test_tq_get_splits.R#23)
     tq_get("XYZ", get = get) showed 0 warnings
    
    
     6. Failure: Test 1 returns tibble with correct rows and columns. (@test_tq_get_stock_prices.R#19)
     nrow(test1) not equal to 104.
     1/1 mismatches
     [1] 103 - 104 == -1
    
    
     7. Failure: Test 2 returns tibble with correct rows and columns. (@test_tq_get_stock_prices.R#28)
     nrow(test2) not equal to 208.
     1/1 mismatches
     [1] 206 - 208 == -2
    
    
     Error in mutate_impl(.data, dots) :
     Evaluation error: character string is not in a standard unambiguous format.
     Calls: test_check ... <Anonymous> -> mutate.tbl_df -> mutate_impl -> .Call
     In addition: Warning messages:
     1: Oanda only provides historical data for the past 180 days. Symbol: EUR/USD
     2: Oanda only provides historical data for the past 180 days. Symbol: EUR/USD
     3: Oanda only provides historical data for the past 180 days. Symbol: gold
     4: Oanda only provides historical data for the past 180 days. Symbol: gold
     testthat results ================================================================
     OK: 159 SKIPPED: 2 FAILED: 7
     1. Error: Test prints warning message on invalid x input. (@test_tq_get_dividends.R#23)
     2. Error: Test returns NA on invalid x input. (@test_tq_get_dividends.R#27)
     3. Failure: Test returns tibble with correct rows and columns. (@test_tq_get_exchange_rates.R#25)
     4. Failure: Test returns tibble with correct rows and columns. (@test_tq_get_metal_prices.R#26)
     5. Failure: Test prints warning message on invalid x input. (@test_tq_get_splits.R#23)
     6. Failure: Test 1 returns tibble with correct rows and columns. (@test_tq_get_stock_prices.R#19)
     7. Failure: Test 2 returns tibble with correct rows and columns. (@test_tq_get_stock_prices.R#28)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-release-linux-x86_64

Version: 0.5.2
Check: package dependencies
Result: ERROR
    Package required but not available: ‘timetk’
    
    See section ‘The DESCRIPTION file’ in the ‘Writing R Extensions’
    manual.
Flavor: r-oldrel-osx-x86_64