plotVIP: Plot VIP for EEM data

Description Usage Arguments Value Examples

Description

Plot VIP for EEM data

Usage

1
plotVIP(x, ncomp = NULL, ...)

Arguments

x

output variable from plsr function

ncomp

number of components/ latent variables

...

(optional) arguments for drawEEM and filled.contour

Value

A figure is returned on the graphic device

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
require(EEM)
data(gluten)
gluten_uf <- unfold(gluten) # unfold list into matrix

# delete columns with NA values
index <- colSums(is.na(gluten_uf)) == 0
gluten_uf <- gluten_uf[, index]
gluten_ratio <- as.numeric(names(gluten))

require(pls)
model <- plsr(gluten_ratio ~ gluten_uf, ncomp = 3, method = "oscorespls") 
plotVIP(model) 
 

chengvt/cheng documentation built on May 13, 2019, 3:52 p.m.