R/print.R

Defines functions print.phrasenet

#' @export
print.phrasenet <- function(x, ...) {
  msg <- paste(
    "Phrase net of", 
    crayon::blue(prettyNum(nrow(x), big.mark = ",")), 
    "connections.\n"
  )
  cat(msg, ...)
}
news-r/phrasenets documentation built on Nov. 4, 2019, 9:40 p.m.