tests/testthat/test_read_ods.R

test_that("Single column ODS", {
    single_col <- read_ods('../testdata/sum.ods', sheet = 1)
    expect_equal(ncol(single_col),1)
    expect_equal(colnames(single_col), c("1"))
})

Try the readODS package in your browser

Any scripts or data that you put into this service are public.

readODS documentation built on May 30, 2017, 3:38 a.m.