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.