path <- system.file("extdata", "virushunter.tsv", package = "Virusparies")
file <- ImportVirusTable(path)
file2 <- ImportVirusTable(path) # both files have 180 observations
combined_file <- CombineHittables(file,file2)
print(nrow(combined_file))
Run the code above in your browser using DataLab