library(testthat) library(xegaSelectGene) test_check("xegaSelectGene")