R/utils.R

In yukai-yang/R6DS: R6 Reference Class Based Data Structures

#################################################################################
## utility functions
#################################################################################

vnum = "1.2.0"
packname = "(Red DS)"

# simple cat
cat0 <- function(...)
{
  words = list(...)
  for(tmp in words) cat(tmp)
  cat("\n")
}

#' Show the version number of some information.
#'
#' This function shows the version number and some information of the package.
#'
#' @author Yukai Yang, \email{yukai.yang@@statistik.uu.se}
#' @keywords utils
#'
#' @export
version <- function(){
  cat0("R6DS version ", vnum, " ",packname)
}