backgroundSites <- readSequence(system.file("extdata", "background_sites.fa", package="ASEB"))
prodefinedSites <- readSequence(system.file("extdata", "predefined_sites.fa", package="ASEB"))
testSites <- readSequence(system.file("extdata", "sites_to_test.fa", package="ASEB"))
resultList <- asebSites(backgroundSites, prodefinedSites, testSites, permutationTimes=100)
resultList$results[1:2,]
Run the code above in your browser using DataCamp Workspace