Learn R Programming

StatDA (version 1.5)

rg.mva: Non-robust Multivariate Data Analysis

Description

Procedure to undertake non-robust multivariate data analysis. The saved list may be passed to other rotation and display functions

Usage

rg.mva(x, main = deparse(substitute(x)))

Arguments

x
data
main
used for the list

Value

  • nnumber of rows
  • pnumber of columns
  • wtsthe weights for the covariance matrix
  • meanthe mean of the data
  • covthe covariance
  • sdthe standard deviation
  • rcorrelation matrix
  • eigenvalueseigenvalues of the SVD
  • econtribproportion of eigenvalues in %
  • eigenvectorseigenvectors of the SVD
  • rloadloadings matrix
  • rcrstandardised loadings matrix
  • vcontribscores variance
  • pvcontribproportion of scores variance in %
  • cpvcontribcummulative proportion of scores variance
  • mdMahalanbois distance
  • ppmprobability for outliegness using F-distribution
  • epmprobability for outliegness using Chisquared-distribution

Details

Procesure to undertake non-robust multivariate data analyses; the object generated is identical to that of rg.robmva so that the savedlist may be passed to other rotation and display functions. Thus weights are set to 1, and other variables are set to appropriate defaults. The estimation of Mahalanobis distances is only undertaken if x is nonsingular, i.e. the lowest eigenvalue is > 10e-4.

References

C. Reimann, P. Filzmoser, R.G. Garrett, and R. Dutter: Statistical Data Analysis Explained. Applied Environmental Statistics with R. John Wiley and Sons, Chichester, 2008.

Examples

Run this code
#input data
data(ohorizon)
vegzn=ohorizon[,"VEG_ZONE"]
veg=rep(NA,nrow(ohorizon))
veg[vegzn=="BOREAL_FOREST"] <- 1
veg[vegzn=="FOREST_TUNDRA"] <- 2
veg[vegzn=="SHRUB_TUNDRA"] <- 3
veg[vegzn=="DWARF_SHRUB_TUNDRA"] <- 3
veg[vegzn=="TUNDRA"] <- 3
el=c("Ag","Al","As","B","Ba","Bi","Ca","Cd","Co","Cu","Fe","K","Mg","Mn",
  "Na","Ni","P","Pb","Rb","S","Sb","Sr","Th","Tl","V","Y","Zn")
x <- log10(ohorizon[!is.na(veg),el])
v <- veg[!is.na(veg)]

rg.mva(as.matrix(x[v==1,]))

Run the code above in your browser using DataLab