#tmp <- importFusionData("fusionmap", paste(find.package(package="chimera"),"/examples/mcf7.FMFusionReport", sep=""), org="hg19")
#fusion.names <- fusionName(tmp)
#tmp1 <- filterList(tmp, type="fusion.names", fusion.names[c(1,3,7)], parallel=FALSE)
#prettyPrint(tmp1, "tmp1.df.txt", fusion.reads="spanning")
Run the code above in your browser using DataLab