| plot.plspm | R Documentation |
Plot method for objects of class "plspm". This
function plots either the inner (i.e. structural) model
with the estimated path coefficients, or the outer (i.e.
measurement) model with loadings or weights.
## S3 method for class 'plspm'
plot(x, what = "inner",
colpos = "#6890c4BB", colneg = "#f9675dBB",
box.prop = 0.55, box.size = 0.08, box.cex = 1,
box.col = "gray95", lcol = "gray95",
txt.col = "gray40", arr.pos = 0.5, cex.txt = 0.9, ...)
x |
An object of class |
what |
What to plot: |
colpos |
Color of arrows for positive path coefficients. |
colneg |
Color of arrows for negative path coefficients. |
box.prop |
Length/width ratio of ellipses and rectangles. |
box.size |
Size of ellipses and rectangles. |
box.cex |
Relative size of text in ellipses and rectangles. |
box.col |
fill color of ellipses and rectangles. |
lcol |
border color of ellipses and rectangles. |
txt.col |
color of text in ellipses and rectangles. |
arr.pos |
Relative position of arrowheads on arrows. |
cex.txt |
Relative size of text on arrows. |
... |
Further arguments passed on to
|
plot.plspm is just a wraper of
innerplot and outerplot.
Function plot.plspm is based on the function
plotmat of package diagram.
http://cran.r-project.org/web/packages/diagram/vignettes/diagram.pdf
innerplot, outerplot,
plspm
## Not run:
## typical example of PLS-PM in customer satisfaction analysis
## model with six LVs and reflective indicators
# load data satisfaction
data(satisfaction)
# define inner model matrix
IMAG = c(0,0,0,0,0,0)
EXPE = c(1,0,0,0,0,0)
QUAL = c(0,1,0,0,0,0)
VAL = c(0,1,1,0,0,0)
SAT = c(1,1,1,1,0,0)
LOY = c(1,0,0,0,1,0)
sat.inner = rbind(IMAG, EXPE, QUAL, VAL, SAT, LOY)
# define outer model list
sat.outer = list(1:5, 6:10, 11:15, 16:19, 20:23, 24:27)
# define vector of reflective modes
sat.mod = rep("A", 6)
# apply plspm
satpls = plspm(satisfaction, sat.inner, sat.outer, sat.mod, scheme="centroid",
scaled=FALSE)
# plot path coefficients
plot(satpls, what="inner")
# plot loadings
plot(satpls, what="loadings")
# plot outer weights
plot(satpls, what="weights")
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.