Last data update: 2014.03.03

R: Summary for an object of class mvPCA.
summary.mvPCAR Documentation

Summary for an object of class mvPCA.

Description

Summary method for an object of class mvPCA.

Usage

## S3 method for class 'mvPCA'
summary(object, loadings = FALSE, cutoff = 0.1, ...)

## S3 method for class 'summary.mvPCA'
print(x, digits = 3, loadings = x$print.loadings, 
               cutoff = x$cutoff, ...)

Arguments

object

an object to type mvPCA.

loadings

logical. Should the loadings be returned.

cutoff

numeric. Loadings below this cutoff in absolute value are shown as blank in the output.

x

an object of class "summary.mvPCA".

digits

the number of significant digits to be used in listing of loadings.

...

arguments to be passed to or from other methods.

Value

'object' with additional components 'cutoff' and 'print.loadings'.

Author(s)

Klaus Nordhausen

See Also

mvPCA

Examples

data(iris)
IRIS <- iris[,1:4]
iris.pca <- mvPCA(IRIS, "sign", "i")
summary(iris.pca, loadings = TRUE)

Results


R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(MNM)
Loading required package: ICSNP
Loading required package: mvtnorm
Loading required package: ICS
Loading required package: SpatialNP
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/MNM/summary.mvPCA.Rd_%03d_medium.png", width=480, height=480)
> ### Name: summary.mvPCA
> ### Title: Summary for an object of class mvPCA.
> ### Aliases: summary.mvPCA print.summary.mvPCA
> ### Keywords: print methods
> 
> ### ** Examples
> 
> data(iris)
> IRIS <- iris[,1:4]
> iris.pca <- mvPCA(IRIS, "sign", "i")
> summary(iris.pca, loadings = TRUE)
Importance of components:
                           Comp.1     Comp.2     Comp.3      Comp.4
Proportion of Variation 0.9484395 0.03626602 0.01200793 0.003286563
Cumulative Proportion   0.9484395 0.98470550 0.99671344 1.000000000

Loadings:
             Comp.1 Comp.2 Comp.3 Comp.4
Sepal.Length  0.342 -0.683  0.596  0.248
Sepal.Width         -0.709 -0.630 -0.301
Petal.Length  0.860  0.171 -0.104 -0.469
Petal.Width   0.364        -0.488  0.792
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>