statisR (version 1.0.1)

statis: STATIS Method

Description

Applies the STATIS method to a set of matrices (data tables) with the same rows. Is a multivariate analysis technique that allows studying the common structure and the evolution of individuals and variables across multiple tables.

Usage

statis(
  matrices,
  selected.tables = NULL,
  selected.rows = NULL,
  table.labels = NULL
)

Value

A list with the following elements:

n

Number of rows (individuals).

r

Number of tables.

p

Vector with the number of columns per table.

S

List of centered matrices.

W

List of proximity matrices.

X

Matrix of interstructure (vectorization of W).

acp.inter

PCA results of the interstructure: eigenvalues, eigenvectors, components, correlations.

XT

Weighted average of the matrices.

acp.intra

PCA results of the average: eigenvalues, eigenvectors, components, correlations.

IND

Concatenated matrix with all W stacked (individual evolution).

Omega

Projection of individual evolution onto the principal components.

circle.inter

Data to plot the correlation circle between tables.

circle.intra

Data to plot the variable evolution circle.

plane.individuals

Data to plot the average individuals plane.

plane.evolution

Data to plot the evolution of the individuals.

Arguments

matrices

List of numeric matrices (at least 2), all with the same number of rows (individuals).

selected.tables

Select a subset of tables. If NULL, all tables are included.

selected.rows

Select a subset of rows. If NULL, all rows are included.

table.labels

Optional vector with names for the tables. It must have the same length as the number of tables.

See Also

plot.statis.circle, plot.statis.plane

Examples

data(expert1, expert2, expert3)

labels <- c("Expert 1", "Expert 2", "Expert 3")

# If you want to select an specific table or tables
res <- statis(list(expert1, expert2, expert3), selected.tables = c(1, 3), table.labels = labels)

# If you want to select an specific row or rows
res <- statis(list(expert1, expert2, expert3), selected.rows = c(1, 5), table.labels = labels)

# If you want to select some tables and rows at the same time
res <- statis(list(expert1,expert2,expert3), selected.tables=c(1, 3), selected.rows=c(1, 4), labels)

# All tables and rows selected
res <- statis(list(expert1, expert2, expert3), table.labels = labels)

# How to use res
inter <- res$circle.inter
plot.statis.circle(inter$points, inter$inertia, inter$labels, inter$title)

evolution <- res$plane.evolution
plot.statis.plane(evolution$points, evolution$inertia, evolution$labels, evolution$title)