R/print.probetable.R

Defines functions print.probetable

Documented in print.probetable

print.probetable = function(x, maxrows = 3, ...) {
  nr = nrow(x)
  np = min(nr, maxrows)
  cat("Object of class", class(x), "with", nr, "rows and", ncol(x), "columns.\n")
  if(nr>maxrows) cat("First", np, "rows are:\n")
  print.data.frame(x[seq_len(np), ])
}
jmacdon/AnnotationDbi documentation built on Oct. 22, 2021, 9:14 p.m.