tests/testthat/test-tally.R

context("tally")

test_that("weighted tally drops NAs (#1145)", {
  df <- data_frame(x = c(1, 1, NA))

  expect_equal(tally(df, x)$n, 2)
})
sctyner/dplyr050 documentation built on May 17, 2019, 2:22 p.m.