R/readSeq.R

In seqCBS: Copy Number Profiling using Sequencing and CBS

Defines functions readSeq

Documented in readSeq

readSeq <-
function(filename, formatName) {
	if(formatName=="ELANDPaired") {
		return(readSeqELANDPaired(filename))
	}
	else if(formatName=="Chiang") {
		return(readSeqChiang(filename))
	}
	else {
		print("Input Format Not Supported")
	}
}

Try the seqCBS package in your browser