Running 'testthat.R' [3s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(corrr)
  > library(dplyr)
  
  Attaching package: 'dplyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following objects are masked from 'package:stats':
  
      filter, lag
  
  The following objects are masked from 'package:base':
  
      intersect, setdiff, setequal, union
  
  > 
  > test_check("corrr")
  -- 1. Error: Diagonal sets correctly (@test-as_cordf.R#18)  --------------------
  object 'rowname' not found
  1: expect_equal(all(diag(as.matrix(as_cordf(d, diagonal = 100)[, -1] == 100))), TRUE) at testthat/test-as_cordf.R:18
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: diag(as.matrix(as_cordf(d, diagonal = 100)[, -1] == 100))
  5: as.matrix(as_cordf(d, diagonal = 100)[, -1] == 100)
  6: Ops.cor_df(as_cordf(d, diagonal = 100)[, -1], 100)
  7: as_matrix(e1)
  8: as_matrix.cor_df(e1)
  9: x %<>% dplyr::select_("-rowname")
  10: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  ...
  18: select_.data.frame(., "-rowname")
  19: select(.data, !!!dots)
  20: select.data.frame(.data, !!!dots)
  21: tidyselect::vars_select(names(.data), !!!quos(...))
  22: vars_select_eval(.vars, quos)
  23: map_if(quos, !is_helper, eval_tidy, mask)
  24: map(.x[sel], .f, ...)
  25: .f(.x[[i]], ...)
  26: -rowname
  27: is_character(x)
  
  -- 2. Error: Converts values accurately (@test-as_matrix.R#11)  ----------------
  object 'rowname' not found
  1: expect_true(all(x[-1] == y, na.rm = TRUE)) at testthat/test-as_matrix.R:11
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: Ops.cor_df(x[-1], y)
  5: as_matrix(e1)
  6: as_matrix.cor_df(e1)
  7: x %<>% dplyr::select_("-rowname")
  8: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  9: eval(quote(`_fseq`(`_lhs`)), env, env)
  10: eval(quote(`_fseq`(`_lhs`)), env, env)
  ...
  16: select_.data.frame(., "-rowname")
  17: select(.data, !!!dots)
  18: select.data.frame(.data, !!!dots)
  19: tidyselect::vars_select(names(.data), !!!quos(...))
  20: vars_select_eval(.vars, quos)
  21: map_if(quos, !is_helper, eval_tidy, mask)
  22: map(.x[sel], .f, ...)
  23: .f(.x[[i]], ...)
  24: -rowname
  25: is_character(x)
  
  -- 3. Error: Diagonal sets correctly (@test-correlate.R#18)  -------------------
  object 'rowname' not found
  1: expect_equal(all(diag(as.matrix(correlate(d, diagonal = 100)[, -1] == 100))), TRUE) at testthat/test-correlate.R:18
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: diag(as.matrix(correlate(d, diagonal = 100)[, -1] == 100))
  5: as.matrix(correlate(d, diagonal = 100)[, -1] == 100)
  6: Ops.cor_df(correlate(d, diagonal = 100)[, -1], 100)
  7: as_matrix(e1)
  8: as_matrix.cor_df(e1)
  9: x %<>% dplyr::select_("-rowname")
  10: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  ...
  18: select_.data.frame(., "-rowname")
  19: select(.data, !!!dots)
  20: select.data.frame(.data, !!!dots)
  21: tidyselect::vars_select(names(.data), !!!quos(...))
  22: vars_select_eval(.vars, quos)
  23: map_if(quos, !is_helper, eval_tidy, mask)
  24: map(.x[sel], .f, ...)
  25: .f(.x[[i]], ...)
  26: -rowname
  27: is_character(x)
  
  == testthat results  ===========================================================
  OK: 71 SKIPPED: 0 FAILED: 3
  1. Error: Diagonal sets correctly (@test-as_cordf.R#18) 
  2. Error: Converts values accurately (@test-as_matrix.R#11) 
  3. Error: Diagonal sets correctly (@test-correlate.R#18) 
  
  Error: testthat unit tests failed
  Execution halted