test_that("ssdGSA_individual works", {
    ssdGSA_individual(Data = data_matrix_entrezID,
                      Gene_sets = gene_sets,
                      Direction_matrix = direction_matrix
    )
})