tests/testthat/test-fbind.R

context("test-fbind")

test_that("fbind() binds factors", {
    x<-factor(c('a','b'))
    y<-factor(c('c','d'))
    z<-factor(c('a','b','c','d'))

    expect_identical(fbind(x,y),z)
})
anneae/foofactors documentation built on May 7, 2019, 8:21 a.m.