R/methods-SffHeader.R

### Accessor functions
setMethod(header, 
	        signature="SffHeader", 
	        function(object) object@header
)

## show
setMethod(show, 
          signature="SffHeader",
	        function(object) {
	          cat("class: ", class(object), "\n", sep="")
#           sapply(header(object), function(x) cat("file:",x$filename,"; number of reads:",x$number_of_reads,"; numer of flows:",x$number_of_flows,"\n"))
})

## detail
setMethod(detail,
	        signature="SffHeader",
	        function(x, ...) {
	          cat("class: ", class(x), "\n", sep="")
            cat("\nheader information:\n")
            show(header(x))   
})

Try the rSFFreader package in your browser

Any scripts or data that you put into this service are public.

rSFFreader documentation built on May 6, 2019, 2:02 a.m.