scree: scree: Scree Plot with Pairwise Complete Cases

Description Usage Arguments Value Examples

View source: R/Scree.R

Description

This function provides a scree plot when data may be missing.

Usage

1

Arguments

data

N by P data matrix.

Value

Returns eigenvalues and scree plot.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
set.seed(999)
your_data=data.frame(mvrnorm(n=20,mu=c(0,0,0,0,0),
                            Sigma=matrix(c(4,2,2,2,2,
                                           2,4,2,2,2,
                                           2,2,4,2,2,
                                           2,2,2,4,2,
                                           2,2,2,2,4),
                                         nrow=5, ncol=5)))
colnames(your_data)=c("x1","x2","x3","x4","x5")
your_data_miss=matrix(ncol=5,nrow=20)
for (i in 1:20){
 for (p in 1:5){
   your_data_miss[i,p]=ifelse(runif(1,0,1)<0.2,NA,your_data[i,p])
 }
}
scree(your_data_miss)

brxx documentation built on Jan. 26, 2021, 5:06 p.m.

Related to scree in brxx...