R/print.Simpson.R

In Simpsons: Detecting Simpson's Paradox

Defines functions print.Simpson

Documented in print.Simpson

print.Simpson <-
function(x,...)
{
  Res <- x$alldata
  names(Res)[1] <- x$namex
  names(Res)[2] <- x$namey
  return(Res)
}

Try the Simpsons package in your browser