## Roundabout way of suppressing guides for matrices
## Not run:
# setMethod("guidesPrint", c("matrix", "character"),
# function(obj, obj.as.chr) integer(0L)
# )
# ## Special guides for "zulu" S3 objects that match lines
# ## starting in "zulu###" where ### is a nuber
# setOldClass("zulu")
# setMethod("guidesPrint", c("zulu", "character"),
# function(obj, obj.as.chr) {
# if(length(obj) > 20) grep("^zulu[0-9]*", obj.as.chr)
# else integer(0L)
# } )
# ## End(Not run)
Run the code above in your browser using DataLab