PLS.biplot.area: The Partial Least Squares (PLS) biplot with triangles for...

Description Usage Arguments Value Author(s) Examples

View source: R/AllFunctions.R

Description

Takes in a set of predictor variables and a set of response variables and produces a PLS biplot, but with rotated coefficient points.

Usage

1
2
PLS.biplot.area(X, Y, algorithm = NULL, ax.tickvec.X = NULL,
  ax.tickvec.Y = NULL, base.tri, bi.value, ...)

Arguments

X

A (NxP) predictor matrix

Y

A (NxM) response matrix

algorithm

Any of the PLS algorithms ("mod.NIPALS", "mod.KernelPLS_R", "mod.KernelPLS_L", "mod.SIMPLS")

ax.tickvec.X

tick marker length for each X-variable axis in the PLS biplot

ax.tickvec.Y

tick marker length for each Y-variable axis in the PLS biplot

base.tri

The desired Y-variable axis to use as the base for the triangle

bi.value

The desired rotated coefficient points (bi) to approximate

...

Other arguments. Currently ignored

Value

The PLS biplot of D=[X Y] with rotated coefficient points

Author(s)

Opeoluwa F. Oyedele and Sugnet Gardner-Lubbe

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
if(require(pls))
data(oliveoil, package="pls")
X = as.matrix(oliveoil$chemical, ncol=5)
dimnames(X) = list(paste(c("G1","G2","G3","G4","G5","I1","I2","I3","I4","I5",
"S1","S2","S3","S4","S5","S6")),
paste(c("Acidity","Peroxide","K232","K270","DK")))
Y = as.matrix(oliveoil$sensory, ncol=6)
dimnames(Y) = list(paste(c("G1","G2","G3","G4","G5","I1","I2","I3","I4","I5",
"S1","S2","S3","S4","S5","S6")),
paste(c("Yellow","Green","Brown","Glossy","Transp","Syrup")))
#with 1 triangle
PLS.biplot.area(X, Y, algorithm=mod.SIMPLS, ax.tickvec.X=c(8,5,5,5,5),
ax.tickvec.Y=c(5,10,5,6,7,10), base.tri=3, bi.value=4)
#with 4 triangles
PLS.biplot.area(X, Y, algorithm=mod.SIMPLS, ax.tickvec.X=c(8,5,5,5,5),
ax.tickvec.Y=c(5,10,5,6,7,10), base.tri=2, bi.value=c(1,2,3,4,5))

Example output

Loading required package: pls

Attaching package: 'pls'

The following object is masked from 'package:stats':

    loadings

$Bmat
         Yellow Green   Brown Glossy Transp  Syrup
Acidity  -1.175 1.343 -1.1120 -0.357 -0.604 -0.119
Peroxide -0.921 0.675  2.3788 -1.638 -1.364  1.862
K232     -1.169 0.977  1.9839 -1.646 -1.448  1.741
K270     -1.365 1.301  0.9420 -1.348 -1.314  1.206
DK       -1.042 1.071  0.0458 -0.748 -0.818  0.515

$Bmat
         Yellow Green   Brown Glossy Transp  Syrup
Acidity  -1.175 1.343 -1.1120 -0.357 -0.604 -0.119
Peroxide -0.921 0.675  2.3788 -1.638 -1.364  1.862
K232     -1.169 0.977  1.9839 -1.646 -1.448  1.741
K270     -1.365 1.301  0.9420 -1.348 -1.314  1.206
DK       -1.042 1.071  0.0458 -0.748 -0.818  0.515

PLSbiplot1 documentation built on May 2, 2019, 9:41 a.m.