Hkda(x, x.group, Hstart, bw="plugin", nstage=2, pilot="samse",
pre="sphere", binned=FALSE)
Hkda.diag(x, x.group, bw="plugin", nstage=2, pilot="samse",
pre="sphere", binned=FALSE)kda(x, x.group, Hs, y, prior.prob=NULL)
pda(x, x.group, y, prior.prob=NULL, type="quad")
kda.kde(x, x.group, Hs, gridsize, supp=3.7, eval.points=NULL)
pda.pde(x, x.group, gridsize, type="quad", xlim, ylim, zlim)
"line" = linear discriminant, "quad" =
quadratic discriminant"plugin" = plug-in, "lscv" = LSCV,
"scv" = SCV"amse" = AMSE pilot bandwidths,
"samse" = single SAMSE pilot bandwidth"scale" = pre-scaling, "sphere" =
pre-sphering-supp, supp]Hkda and Hkda.diag is a stacked matrix
of bandwidth matrices for each training data group. This is then
suitable to passed as the Hs argument in kda. The values that valid for bw are "plugin", "lscv" and
"scv" for Hkda. These in turn call Hpi,
Hlscv and Hscv. For plugin selectors, all
of nstage, pilot and pre need to be set. For SCV
selectors, currently nstage=1 always but pilot and pre
need to be set. For LSCV selectors, none of them are required.
For Hkda.diag, options are "plugin" or "lscv"
which in turn call respectively Hpi.diag
and Hlscv.diag. Again, nstage, pilot and
pre are available for Hpi.diag but not required for
Hlscv.diag.
For details on the pre-transformations in pre, see
pre.sphere and pre.scale.
-- The result from kda and pda is a vector of group labels
estimated via a discriminant (or classification)
rule. If the test data y are given then these are
classified. Otherwise the training data x are classified.
-- The result from kda.kde and pda.pde is a density estimate
for discriminant analysis is an object of class dade which is a
list with 6 fields
eval.points"kernel", "linear", "quadratic" indicating
the type of discriminant analyser used.prior.prob to these.
Otherwise prior.prob=NULL is the default i.e. use the sample
proportions as estimates of the prior probabilities. The linear and quadratic discriminant analysers are based on
lda and qda from the MASS library.
-- The values that valid for bw are "plugin", "lscv" and
"scv" for
Hkda. These in turn call Hpi,
Hlscv and Hscv. For plugin selectors, all
of nstage, pilot and pre need to be set. For SCV
selectors, currently nstage=1 always but pilot and pre
need to be set. For LSCV selectors, none of them are required.
For Hkda.diag, options are "plugin" or "lscv"
which in turn call respectively Hpi.diag
and Hlscv.diag. Again, nstage, pilot and
pre are available for Hpi.diag but not required for
Hlscv.diag.
-- The kernel density estimate is based on kde.
If eval.points=NULL (default) then the
density estimate is automatically computed over a grid whose
resolution is controlled by gridsize (default is
100 in each co-ordinate direction).
If xlim and ylim are not specified then they default to
be 10% bigger than the range of the data values.
Venables, W.N. & Ripley, B.D. (1997) Modern Applied Statistics with S-PLUS. Springer-Verlag. New York.
compare,
compare.kda.cv,
compare.pda.cv### bivariate example - restricted iris dataset
library(MASS)
data(iris)
ir <- iris[,1:2]
ir.gr <- iris[,5]
H <- Hkda(ir, ir.gr, bw="plugin", pre="scale")
kda.gr <- kda(ir, ir.gr, H, ir)
lda.gr <- pda(ir, ir.gr, ir, type="line")
qda.gr <- pda(ir, ir.gr, ir, type="quad")
### multivariate example - full iris dataset
ir <- iris[,1:4]
ir.gr <- iris[,5]
H <- Hkda(ir, ir.gr, bw="plugin", pre="scale")
kda.gr <- kda(ir, ir.gr, H, ir)
lda.gr <- pda(ir, ir.gr, ir, type="line")
qda.gr <- pda(ir, ir.gr, ir, type="quad")Run the code above in your browser using DataLab