View source: R/plot.netSEMp2.R
plot.netSEMp2 | R Documentation |
Plot netSEMp2 result plot.netSEMp2 plots a network structural equation model diagram, fitted under principle 2, based on best functional form for each selected pairwise variable.
## S3 method for class 'netSEMp2' plot( x, cutoff = c(0.3, 0.6, 0.8), latent = NULL, plot.save = FALSE, filename = NULL, style = TRUE, ... )
x |
An object of class "netSEMp2", the returned list from |
cutoff |
A threshold value for adjusted R-squared. The maximum number of cutoff is 3. |
latent |
The latent variable that corresponds to the mechanic variable. The default is NULL. |
plot.save |
True/False, it saves the network diagram plot as png file. The default is false. |
filename |
A character string naming a file to save as a png file. |
style |
True/False, it plots the first interval in the network diagram with dotted weak line. The default is True. |
... |
A S3 generic/method consistency. |
An html style plot of multiple regression relationship pathway diagram between exogenous variables and an endogenous variable. Arrows show relationships between each variable with given statistical relations along the connection lines.
netSEMp2
# Load acrylic data set data(acrylic) # Build a netSEMp2 model ans2 <- netSEMp2(acrylic, criterion = "AIC") ans2_BIC <- netSEMp2(acrylic, criterion = "BIC") # Plot the network model plot(ans2, cutoff = c(0.3,0.6,0.8)) plot(ans2_BIC , cutoff = c(0.3,0.6,0.8)) ## Not run: # Drop Relationship lower than minimum cutoff plot(ans2, cutoff = c(0.3,0.6,0.8), style = FALSE) # plot network model with latent argument labels plot(ans2, cutoff = c(0.3, 0.6, 0.8), latent = c('IAD1' = 'FundAbsEdge', 'IAD2' = 'UVStab', 'IAD2p' = 'UVStab', 'IAD3' = 'YelMet')) # plot the network diagram and save file #plot(ans, cutoff = c(0.3,0.6,0.8), plot.save = TRUE, filename = "acrylic-netSEMp2")) ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.