ftable-matrix memisc 0.99.20.1

Combining flattened tables.

Description

With the method functions described here, flattened (contingency) tables can be combined into more complex objects, of class "ftable_matrix". For objects of these class format and print methods are provided

Usage

## S4 method for signature 'ftable'
cbind(..., deparse.level=1)

## S4 method for signature 'ftable'
rbind(..., deparse.level=1)

## S4 method for signature 'ftable_matrix'
cbind(..., deparse.level=1)

## S4 method for signature 'ftable_matrix'
rbind(..., deparse.level=1)

## S4 method for signature 'ftable_matrix'
format(x,quote=TRUE,digits=0,format="f",...)

## S4 method for signature 'ftable_matrix'
Write(x,
                            file = "",
                            quote = TRUE,
                            append = FALSE,
                            digits = 0,
                            ...)

## S4 method for signature 'ftable_matrix'
print(x,quote=FALSE,...)

Arguments

...

for cbind and rbind methods, two or more objects of class "ftable" or "ftable_matrix"; for the other methods: further arguments, ignored.

deparse.level

ignored, retained for compatibility reasons only.

x

an object used to select a method.

quote

logical, indicating whether or not strings should be printed with surrounding quotes.

digits

numeric or integer, number of significant digits to be shown.

format

a format string as in formatC

file

character string, containing a file path.

append

logical, should the output appended to the file?

Value

cbind and rbind, when used with "ftable" or "ftable_matrix" objects, return objects of class "ftable_matrix".

Examples

ft1 <- ftable(Sex~Survived,Titanic)
ft2 <- ftable(Age+Class~Survived,Titanic)
ft3 <- ftable(Survived~Class,Titanic)
ft4 <- ftable(Survived~Age,Titanic)
ft5 <- ftable(Survived~Sex,Titanic)
tab10 <- xtabs(Freq~Survived,Titanic)
(c12.10 <- cbind(ft1,ft2,Total=tab10))
                          Age   Child              Adult
         Sex Male Female  Class   1st 2nd 3rd Crew   1st 2nd 3rd Crew   Total
Survived
No           1364    126            0   0  52    0   122 167 476  673    1490
Yes           367    344            6  24  27    0   197  94 151  212     711
(r345.10 <- rbind(ft3,ft4,ft5,Total=tab10))
       Survived   No Yes
Class
1st              122 203
2nd              167 118
3rd              528 178
Crew             673 212

Age
Child             52  57
Adult           1438 654

Sex
Male            1364 367
Female           126 344

Total           1490 711
## Not run:
##
## tf <- tempfile()
## Write(c12.10,file=tf)
## file.show(tf)
## End(Not run)