test_that("multiline values", {
x <- read_ods('../testdata/multiline_cells.ods', col_names = FALSE)
expect_equal(x[[1, 1]], "Multiline cell, line 1\nMultiline cell, line 2")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.