R/print.rdacv.R

Defines functions print.rdacv

print.rdacv <- function(x, ...){
  cat("Call:\n")
  dput(x$call)
  nonzero <- x$ngene; errors <- x$cv.err
  #dimnames(nonzero) <- dimnames(errors) <- 
  #  list(round(x$alpha, 3), round(x$delta, 3))
  tmp <- list(nonzero=nonzero, cv.err=errors)
  print(tmp)
}
  

Try the rda package in your browser

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

rda documentation built on May 30, 2017, 7:05 a.m.