tab.names: tab.names

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

Usage

tab.names(tab, rev = c("neither", "rows", "columns", "both"))

Arguments

tab
rev

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function(tab,rev = c("neither", "rows", "columns", "both")){
    if ((ncol(tab)>= 2) & (nrow(tab)>=2)) {
        N<-nrow(tab)
            reverse <- match.arg(rev)
            if (reverse == "columns")  tab <- x[N:1, ]
            if (reverse == "rows")     tab <- tab[, 2:1]
            if (reverse == "neither")  tab <- tab[N:1, 2:1]
            if (reverse == "both")     tab <- tab
    return(colnames(tab))
  }
  }

gvdovandzung/thongke documentation built on May 23, 2020, 12:35 a.m.