ade4 (version 1.01)

ktab: the class of objects 'ktab' (K-tables)

Description

an object of class 'ktab' is a list of data frame with the same row.names in common. a list of class 'ktab' contains moreover : blo{: the vector of the number of columns for each table} lw{: the vector of the row weightings in common for all tables} cw{: the vector of the column weightings} TL{: a data frame of two components to manage the parameter positions associated with the rows of tables} TC{: a data frame of two components to manage the parameter positions associated with the columns of tables} T4{: a data frame of two components to manage the parameter positions of 4 components associated to an array}

Usage

c.ktab (...)
object [selection]
is.ktab(x)
t.ktab(x)
row.names.ktab(x)
col.names.ktab(x)
tab.names(x)
row.names(x)<-value
col.names(x)<-value
tab.names(x)<-value
ktab.util.names(x)

Arguments

x

an object of the class 'ktab'

...

a sequence of objects of the class 'ktab'

selection

an integer vector

Value

• c.ktab returns an object 'ktab'. It concatenates K-tables with the same rows in common t.ktab returns an object 'ktab'. It permutes each data frame into a K-tables. All tables have the same column names and the same column weightings (a data cube) "[" returns an object 'ktab'. It allowes to select some arrays in a K-tables is.ktab returns TRUE if x is a K-tables row.names returns the vector of the row names common with all the tables of a K-tables and allowes to modifie them. col.names returns the vector of the column names of a K-tables and allowes to modifie them. tab.names returns the vector of the array names of a K-tables and allowes to modifie them. ktab.util.names is a useful function.

Details

A 'ktab' object can be created with : a list of data frame : ktab.list.df a list of 'dudi' objects : ktab.list.dudi a data.frame : ktab.data.frame an object 'within' : ktab.within

Examples

data(friday87)
wfri <- data.frame(scale(friday87$fau, scal = FALSE))
wfri <- ktab.data.frame(wfri, friday87$fau.blo)
wfri[2:4]
c(wfri[2:4], wfri[5])

data(meaudret)
wit1 <- within.pca(meaudret$mil, meaudret$plan$dat, scan = FALSE, 
    scal = "partial")
kta1 <- ktab.within(wit1, colnames = rep(c("S1","S2","S3","S4","S5"), 4))
kta2 <- t(kta1)
kplot(sepan(kta2), clab.r = 1.5, clab.c = 0.75)