R/print.wcmd.R

Defines functions print.wcmd

Documented in print.wcmd

print.wcmd <- function(x, ...) {

  cat("\nWinsteps Command File\n\n")
  if(!is.null(x$title))
    cat("Title:", x$title, "\n")
  cat("Data: ", x$data, "\n\n")

}

Try the Rwinsteps package in your browser

Any scripts or data that you put into this service are public.

Rwinsteps documentation built on May 2, 2019, 1:08 p.m.