R/summary.blastRes.R

In fischuu/hoardeR: Collect and Retrieve Annotation Data for Various Genomic Data Using Different Webservices

summary.blastRes <- function(object, ...){
  cat("BlastRes Summary\n")
  cat("----------------\n")
  cat("Total Blast Results :",length(object$RID),"\n")
  cat("Used Database       :",object$database,"\n")
  invisible(object)
}