Description Usage Arguments Details Value Author(s) Examples
an object of class ktab
is a list of data frames with the same row.names in common.
a list of class 'ktab' contains moreover :
: the vector of the numbers of columns for each table
: the vector of the row weightings in common for all tables
: the vector of the column weightings
: a data frame of two components to manage the parameter positions associated with the rows of tables
: a data frame of two components to manage the parameter positions associated with the columns of tables
: a data frame of two components to manage the parameter positions of 4 components associated to an array
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
x |
an object of the class |
... |
a sequence of objects of the class |
i,j,k |
elements to extract (integer or empty): index of tables (i), rows (j) and columns (k) |
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
a couple of ktab
s : ktab.match2ktabs
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 allows 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.
Daniel Chessel
Anne B Dufour anne-beatrice.dufour@univ-lyon1.fr
Stephane Dray stephane.dray@univ-lyon1.fr
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | data(friday87)
wfri <- data.frame(scale(friday87$fau, scal = FALSE))
wfri <- ktab.data.frame(wfri, friday87$fau.blo)
wfri[2:4, 1:5, 1:3]
c(wfri[2:4], wfri[5])
data(meaudret)
wit1 <- withinpca(meaudret$env, meaudret$design$season, scan = FALSE,
scal = "partial")
kta1 <- ktab.within(wit1, colnames = rep(c("S1","S2","S3","S4","S5"), 4))
kta2 <- t(kta1)
if(adegraphicsLoaded()) {
kplot(sepan(kta2), row.plab.cex = 1.5, col.plab.cex = 0.75)
} else {
kplot(sepan(kta2), clab.r = 1.5, clab.c = 0.75)
}
|
class: ktab
tab number: 3
data.frame nrow ncol
1 Odonata 5 3
2 Trichoptera 5 3
3 Ephemeroptera 5 3
vector length mode content
4 $lw 5 numeric row weigths
5 $cw 9 numeric column weights
6 $blo 3 numeric column numbers
7 $tabw 0 NULL array weights
data.frame nrow ncol content
8 $TL 15 2 Factors Table number Line number
9 $TC 9 2 Factors Table number Col number
10 $T4 12 2 Factors Table number 1234
11 $call: `[.ktab`(x = wfri, i = 2:4, j = 1:5, k = 1:3)
names :
Odonata : B1 B2 B3
Trichoptera : C1 C2 C3
Ephemeroptera : D1 D2 D3
Col weigths :
Odonata : 1 1 1
Trichoptera : 1 1 1
Ephemeroptera : 1 1 1
Row weigths :
0.2 0.2 0.2 0.2 0.2
class: ktab
tab number: 4
data.frame nrow ncol
1 Odonata 16 7
2 Trichoptera 16 13
3 Ephemeroptera 16 4
4 Coleoptera 16 13
vector length mode content
5 $lw 16 numeric row weigths
6 $cw 37 numeric column weights
7 $blo 4 numeric column numbers
8 $tabw 0 NULL array weights
data.frame nrow ncol content
9 $TL 64 2 Factors Table number Line number
10 $TC 37 2 Factors Table number Col number
11 $T4 16 2 Factors Table number 1234
12 $call: c.ktab(wfri[2:4], wfri[5])
names :
Odonata : B1 B2 B3 B4 B5 B6 B7
Trichoptera : C1 C2 C3 C4 C5 C6 C7 C8 C9 Ca Cb Cc Cd
Ephemeroptera : D1 D2 D3 D4
Coleoptera : E1 E2 E3 E4 E5 E6 E7 E8 E9 Ea Eb Ec Ed
Col weigths :
Odonata : 1 1 1 1 1 1 1
Trichoptera : 1 1 1 1 1 1 1 1 1 1 1 1 1
Ephemeroptera : 1 1 1 1
Coleoptera : 1 1 1 1 1 1 1 1 1 1 1 1 1
Row weigths :
0.0625 0.0625 0.0625 0.0625 0.0625 0.0625 0.0625 0.0625 0.0625 0.0625 0.0625 0.0625 0.0625 0.0625 0.0625 0.0625
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.