GDAtools (version 1.5)

prop.wtable: Transforms a (possibly weighted) contingency table into percentages

Description

Computes a contingency table from one or two vectors, with the possibility of specifying weights, and then computes the percentages.

Usage

prop.wtable(var1,var2=NULL,w=rep.int(1,length(var1)),dir=0,digits=1,mar=TRUE,na=TRUE)

Arguments

var1

an object which can be interpreted as factor

var2

an optional object which can be interpreted as factor

w

an optional numeric vector of weights (by default, a vector of 1 for uniform weights)

dir

integer: 0 for percentages, 1 for row percentages and 2 for column percentages (default is 0)

digits

integer indicating the number of decimal places (default is 1)

mar

logical. If TRUE (default), margins are computed

na

logical. If TRUE (default), 'NA' are treated as a category. If FALSE, they are ignored

Value

Returns a contingency table expressed in percentages in matrix format.

See Also

wtable, prop.table

Examples

# NOT RUN {
## Computes a contingency table
## (expressed in percentages)
## of jazz and age variables
## from the 'Music' example data set
## with or without weights
data(Music)
prop.wtable(Music$Jazz)
prop.wtable(Music$Jazz,Music$Gender)
prop.wtable(Music$Jazz,Music$Gender,dir=1)
prop.wtable(Music$Jazz,Music$Gender,dir=2)

weight <- rep(c(0,0.5,1,1.5,2), length.out=nrow(Music))
prop.wtable(Music$Jazz,w=weight)
prop.wtable(Music$Jazz,Music$Age,weight)
prop.wtable(Music$Jazz,Music$Age,weight,dir=1)
prop.wtable(Music$Jazz,Music$Age,weight,dir=2)
# }