R/tab.tab.r

In gvdovandzung/thongke: What the package does (short line)

Defines functions tab.tab

Documented in tab.tab

tab.tab <- function(tab,rev = c("rows", "columns")){
            reverse <- match.arg(rev)
switch(reverse,
	rows=rownames(tab),
	columns=colnames(tab))
}