pctab {Epi}R Documentation

Create percentages in a table

Description

Computes percentages and a margin of totals along a given margin of a table.

Usage

pctab(TT, margin = length(dim(TT)))

Arguments

TT A table or array object
margin Which margin should be the the total?

Value

A table, where all dimensions except the one specified margin has two extra levels named "All" (where all entries are 100) and "N".

Author(s)

Bendix Carstensen, Steno Diabtes Center, http://www.biostat.ku.dk/~bxc

See Also

addmargins

Examples

Aye <- sample( c("Yes","Si","Oui"), 177, replace=TRUE )
Bee <- sample( c("Hum","Buzz"), 177, replace=TRUE )
Sea <- sample( c("White","Black","Red","Dead"), 177, replace=TRUE )
A <- table( Aye, Bee, Sea )
A
ftable( pctab( A ) )
ftable( pctab( addmargins( A, 1 ), 3 ) )
round( ftable( pctab( addmargins( A, 1 ), 3 ), row.vars=3 ), 1)

[Package Epi version 0.1 Index]