tests/testthat/test-seurat.R

In FASTGenomics/fastgenomicsR: Facilitates the use of the FASTGenomics backend.

context("test-seurat")

test_that( "test read/write seurat of process",
{
    mapping <- get_input_file_mapping("../../tests/data/working_seurat")
    process <- Process("../../tests/apps/working_seurat", "../../tests/data/working_seurat")
    seurat <- read_seurat(process)
    expect_true(!(is.null(seurat)))

    write_seurat(process, seurat)

})