Running 'testthat.R' [2s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library("testthat")
  > library("ezsummary")
  > 
  > test_check("ezsummary")
  -- 1. Failure: ezsummary_c can't rename the variables for data with grouping inf
  names(ezsummary_categorical(df2))[2] not equivalent to c("variable").
  1/1 mismatches
  x[1]: "count"
  y[1]: "variable"
  
  -- 2. Failure: ezsummary_c can't rename the variables for data with grouping inf
  names(ezsummary_categorical(df2, n = T))[2:3] not equivalent to c("variable", "n").
  2/2 mismatches
  x[1]: "n"
  y[1]: "variable"
  
  x[2]: "count"
  y[2]: "n"
  
  -- 3. Failure: ezsummary_c can't rename the variables for data with grouping inf
  as.character(ezsummary_categorical(df2)[2, 2]) not equivalent to c("gear_4").
  1/1 mismatches
  x[1]: "13"
  y[1]: "gear_4"
  
  -- 4. Failure: ezsummary_c can't rename the variables for data with grouping inf
  as.character(ezsummary_categorical(df2, n = T)[2, 2:3]) not equivalent to c("gear_4", "19").
  2/2 mismatches
  x[1]: "32"
  y[1]: "gear_4"
  
  x[2]: "13"
  y[2]: "19"
  
  -- 5. Error: ezsummary_quantitative can evaluate grouping info correctly with 1 
  Duplicate identifiers for rows (1, 2), (3, 4), (5, 6)
  1: expect_equal(names(ezsummary_quantitative(df2)), expected = c("am", "variable", "mean", 
         "sd")) at testthat/test-ezsummary_quantitative.R:19
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: ezsummary_quantitative(df2)
  5: tbl_summary %>% spread(analysis, value, fill = fill) %>% ungroup() %>% mutate(variable = factor(variable, 
         levels = setdiff(var_name, group_name))) %>% arrange_(c("variable", group_name))
  6: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  7: eval(quote(`_fseq`(`_lhs`)), env, env)
  8: eval(quote(`_fseq`(`_lhs`)), env, env)
  9: `_fseq`(`_lhs`)
  10: freduce(value, `_function_list`)
  11: function_list[[i]](value)
  12: spread(., analysis, value, fill = fill)
  13: spread.data.frame(., analysis, value, fill = fill)
  14: abort(glue("Duplicate identifiers for rows {rows}"))
  
  -- 6. Error: ezsummary_quantitative can work with 2 variables with grouping info
  Duplicate identifiers for rows (5, 6), (3, 4), (9, 10), (7, 8), (1, 2)
  1: expect_equal(names(ezsummary_quantitative(df4)), expected = c("am", "variable", "mean", 
         "sd")) at testthat/test-ezsummary_quantitative.R:33
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: ezsummary_quantitative(df4)
  5: tbl_summary %>% spread(analysis, value, fill = fill) %>% ungroup() %>% mutate(variable = factor(variable, 
         levels = setdiff(var_name, group_name))) %>% arrange_(c("variable", group_name))
  6: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  7: eval(quote(`_fseq`(`_lhs`)), env, env)
  8: eval(quote(`_fseq`(`_lhs`)), env, env)
  9: `_fseq`(`_lhs`)
  10: freduce(value, `_function_list`)
  11: function_list[[i]](value)
  12: spread(., analysis, value, fill = fill)
  13: spread.data.frame(., analysis, value, fill = fill)
  14: abort(glue("Duplicate identifiers for rows {rows}"))
  
  -- 7. Error: ezsummary_quantitative can handle NAs when running with quantile=TR
  Can't find columns `mean`, `sd`, `q0`, `q25`, `q50`, ... (and 2 more) in `.data`.
  1: expect_equivalent(df5 %>% group_by(y) %>% ezsummary(quantile = TRUE) %>% select(q0, 
         q25, q50, q75, q100), expected = structure(list(q0 = -2, q25 = -1, q50 = 0, q75 = 1, 
         q100 = 2), class = c("tbl_df", "tbl", "data.frame"), row.names = as.integer(1))) at testthat/test-ezsummary_quantitative.R:40
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: df5 %>% group_by(y) %>% ezsummary(quantile = TRUE) %>% select(q0, q25, q50, q75, 
         q100)
  5: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  6: eval(quote(`_fseq`(`_lhs`)), env, env)
  7: eval(quote(`_fseq`(`_lhs`)), env, env)
  8: `_fseq`(`_lhs`)
  9: freduce(value, `_function_list`)
  10: function_list[[i]](value)
  11: ezsummary(., quantile = TRUE)
  12: do.call("ezsummary_q", append(list(tbl = tbl_q), ez_options_q))
  13: ezsummary_q(tbl = structure(list(x = c(-2, 2, 0, NA), y = c(1, 1, 1, 1)), class = c("grouped_df", 
     "tbl_df", "tbl", "data.frame"), row.names = c(NA, 4L), groups = structure(list(y = 1, 
         .rows = list(1:4)), row.names = c(NA, -1L), class = c("tbl_df", "tbl", "data.frame"
     ), .drop = TRUE), var_types = c(x = "q", y = "q")), quantile = TRUE)
  14: tbl_summary[c(if (flavor == "long" & n_group != 0) group_name else NULL, "variable", 
         tasks_names)]
  15: `[.tbl_df`(tbl_summary, c(if (flavor == "long" & n_group != 0) group_name else NULL, 
         "variable", tasks_names))
  16: check_names_df(i, x)
  17: check_names_before_after_character(j, names(unclass(x)))
  18: abort(error_unknown_names(unknown_names))
  
  == testthat results  ===========================================================
  OK: 20 SKIPPED: 0 FAILED: 7
  1. Failure: ezsummary_c can't rename the variables for data with grouping info (@test-ezsummary_categorical.R#29) 
  2. Failure: ezsummary_c can't rename the variables for data with grouping info (@test-ezsummary_categorical.R#31) 
  3. Failure: ezsummary_c can't rename the variables for data with grouping info (@test-ezsummary_categorical.R#33) 
  4. Failure: ezsummary_c can't rename the variables for data with grouping info (@test-ezsummary_categorical.R#35) 
  5. Error: ezsummary_quantitative can evaluate grouping info correctly with 1 variable (@test-ezsummary_quantitative.R#19) 
  6. Error: ezsummary_quantitative can work with 2 variables with grouping info (@test-ezsummary_quantitative.R#33) 
  7. Error: ezsummary_quantitative can handle NAs when running with quantile=TRUE (@test-ezsummary_quantitative.R#40) 
  
  Error: testthat unit tests failed
  Execution halted