discrproj {fpc} | R Documentation |
An interface for ten methods of linear dimension reduction in order to separate the groups optimally in the projected data. Includes classical discriminant coordinates, methods to project differences in mean and covariance structure, asymmetric methods (separation of a homogeneous class from a heterogeneous one), local neighborhood-based methods and methods based on robust covariance matrices.
discrproj(x, clvecd, method="awc", clnum=1, ...)
x |
the data matrix; a numerical object which can be coerced to a matrix. |
clvecd |
vector of class numbers which can be coerced into
integers; length must equal
nrow(xd) . |
method |
one of
|
clnum |
integer. Number of the class which is attempted to plot homogeneously by "asymmetric methods", which are the methods assuming that there are only two classes, as indicated above. |
... |
additional parameters passed to the projection methods. |
discrproj
returns the output of the chosen projection method,
which is a list with at least the components ev, units, proj
.
For detailed informations see the help pages of the projection methods.
ev |
eigenvalues in descending order, usually indicating portion of information in the corresponding direction. |
units |
columns are coordinates of projection basis vectors.
New points x can be projected onto the projection basis vectors
by x %*% units |
proj |
projections of xd onto units . |
Christian Hennig hennig@math.uni-hamburg.de http://www.math.uni-hamburg.de/home/hennig/
Hennig, C. (2003) Symmetric, asymmetric, and robust linear dimension reduction for classification, submitted, http://stat.ethz.ch/Research-Reports/108.html.
Seber, G. A. F. (1984). Multivariate Observations. New York: Wiley.
Fukunaga (1990). Introduction to Statistical Pattern Recognition (2nd ed.). Boston: Academic Press.
discrcoord
, batcoord
,
mvdcoord
, adcoord
,
awcoord
, ncoord
,
ancoord
.
rFace
for generation of the example data used below.
set.seed(4634) face <- rFace(600,dMoNo=2,dNoEy=0) grface <- as.integer(attr(face,"grouping")) discrproj(face,grface, method="nc")$units discrproj(face,grface, method="wnc")$units discrproj(face,grface==1, method="arc")$units