| drawConcept | R Documentation |
Draw Concept Diagram
drawConcept( labels, nodelabels = list(), vars = NULL, moderator = NULL, covar = NULL, nodemode = 1, xpos = c(0, 0.5), mpos = c(0.5, 0.9), ypos = c(1, 0.5), minypos = 0, maxypos = 0.6, node.pos = list(), serial = FALSE, parallel = FALSE, parallel2 = FALSE, parallel3 = FALSE, bmatrix = NULL, curved.arrow = NULL, segment.arrow = NULL, radx = 0.06, rady = 0.04, box.col = "white", palette = NULL, reverse = FALSE, xmargin = 0.02, ymargin = 0.02, showPos = FALSE, xinterval = NULL, yinterval = NULL, label.pos = 1, drawbox = FALSE )
labels |
A list |
nodelabels |
A list |
vars |
A list of triple moderators |
moderator |
A list of modeators |
covar |
A list of covariates |
nodemode |
integer If 1, separate node name and node label |
xpos |
The x and y position of X node. Default value is c(0,0.5) |
mpos |
The x and y position of M node. Default value is c(0.5,0.9) |
ypos |
The x and y position of Y node. Default value is c(1,0.5) |
minypos |
minimal y position of X or W variables |
maxypos |
maximal y position of X or W variables |
node.pos |
A optional list of node position |
serial |
Logical. If TRUE, serial variables are added |
parallel |
logical If true, draw parallel multiple mediation model |
parallel2 |
logical If true, draw parallel2 multiple mediation model |
parallel3 |
logical If true, draw parallel3 multiple mediation model |
bmatrix |
integer specifying causal relations among mediators |
curved.arrow |
Optional numeric vector specifying curvedarrow |
segment.arrow |
Optional numeric vector specifying segmentarrow |
radx |
horizontal radius of the box. |
rady |
vertical radius of the box. |
box.col |
fill color of the box |
palette |
character. palette name |
reverse |
logical. Reverse palette or not. |
xmargin |
horizontal margin between nodes |
ymargin |
vertical margin between nodes |
showPos |
logical If true print node position |
xinterval |
numeric. Horizontal intervals among labels for nodes and nodes |
yinterval |
numeric. Vertical intervals among labels for nodes and nodes |
label.pos |
Integer Position of nodelabels. Choices are one of 1:2 |
drawbox |
logical If true, draw rectangle |
labels=list(X="estress",M="affect",Y="withdraw")
vars=list(name=list(c("tenure","age")),site=list(c("a","b")))
moderator=list(name=c("age","sex"),site=list(c("c"),c("b","c")),pos=c(1,2),
arr.pos=list(c(0.3),c(0.3,0.7)))
drawConcept(labels=labels)
drawConcept(labels=labels,vars=vars,drawbox=TRUE)
drawConcept(labels=labels,moderator=moderator,drawbox=TRUE)
drawConcept(labels=labels,vars=vars,moderator=moderator,drawbox=TRUE)
labels=list(X="X",M=c("M1","M2","M3"),Y="Y")
drawConcept(labels=labels,serial=TRUE)
drawConcept(labels=labels,parallel=TRUE,bmatrix=c(1,1,0,1,0,0,1,1,1,1))
drawConcept(labels=labels,parallel2=TRUE,bmatrix=c(1,1,0,1,0,0,1,1,1,1))
labels=list(X="baby",M=c("wine","tent","sand"),Y="tile")
bmatrix=c(1,1,0,1,0,0,1,1,1,1)
drawConcept(labels=labels,parallel=TRUE,bmatrix=bmatrix)
moderator=list(name=c("milk","hair"),
matrix=list(c(1,1,0,1,0,0,0,0,0,0),c(0,0,0,0,0,0,0,1,0,0)))
drawConcept(labels=labels,parallel=TRUE,bmatrix=bmatrix,moderator=moderator)
bmatrix=c(1,1,0,0,1,1,1,1,0,1)
moderator=list(name=c("milk","hair"),
matrix=list(c(1,0,0,0,1,0,1,0,0,0),c(1,1,0,0,0,0,0,0,0,0)),
pos=c(1,4))
node.pos=list(X=c(0,0.5),M1=c(0.3,0.9),M2=c(0.3,0.1),M3=c(0.7,0.9),
Y=c(1,0.5),W1=c(0.7,0.1),W2=c(0,0.9))
drawConcept(labels=labels,bmatrix=bmatrix,moderator=moderator,node.pos=node.pos)
labels=list(X="baby",M=c("wine","tent","sand"),Y="tile")
vars=list(name=list(c("milk","hair")),matrix=list(c(1,0,0,0,0,0,1,0,0,0)),pos=2)
bmatrix=c(1,1,0,1,0,0,1,1,1,1)
drawConcept(labels=labels,parallel=TRUE,bmatrix=bmatrix,vars=vars)
labels=list(X="X",M=c("M1","M2"),Y="Y")
vars=list(name=list(c("W","Z")),matrix=list(c(0,0,1,0,0,0)),pos=6)
bmatrix=c(1,1,1,1,1,1)
drawConcept(labels=labels,bmatrix=bmatrix,vars=vars,palette="Set3")
labels=list(X="X",M="M",Y="Y")
vars=list(name=list(c("W","Z")),site=list(c("a","c")),arr.pos=list(c(0.7,0.3)))
moderator=list(name=c("V","Q"),site=list(c("b","c"),c("c")),
pos=c(2,5),arr.pos=list(c(0.3,0.7),0.5))
drawConcept(labels=labels,vars=vars,moderator=moderator,nodemode=2)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.