inst/unitTests/test_print.R

## test some print function(s)
### =========================
## AnnotParam related
### =========================
"test_printAnnotParamObject" <- function(){

  obj <- new("AnnotParamObject")

  ## the printed value
  checkTrue(capture.output(print(obj))=="Annotation provided manually ")
}

Try the easyRNASeq package in your browser

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

easyRNASeq documentation built on April 30, 2020, 2 a.m.