| editMIM {mimR} | R Documentation |
Editing a mim model object by adding/deleting edges.
editmim(obj, deleteEdge=NULL, addEdge=NULL, haddEdge=NULL,
deleteTerm=NULL, addTerm=NULL)
testdelete(edge, obj, arg=NULL)
obj |
A mim model object |
deleteEdge |
Edges to be deleted |
addEdge |
Edges to be added |
haddEdge |
Edges to be added (homogeneously) |
deleteTerm |
Terms to be deleted |
addTerm |
Terms to be added |
edge |
Edge to be tested |
arg |
Additional arguments to MIM specifying the tests |
retrieve is used for retrieving a model (as a mim object) manually from MIM after e.g. altering a model in the MIM program directly
A new mim model object
Before using mimR, make sure that the MIM program is runnning.
Søren Højsgaard, sorenh@agrsci.dk
David Edwards, An Introduction to Graphical Modelling, Second Edition, Springer Verlag, 2000
See Also as modelTest
data(rats)
gmd.rats <- as.gmData(rats)
m.main <- mim(".", data=gmd.rats)
m2 <- editmim(m.main, addEdge=c("Sex:Drug", "Sex:W2"))
m3 <- editmim(m.main, addEdge=c("Sex:Drug", "Sex:W2"),haddEdge="Drug:W1:W2")
summary(m2)
summary(m3)
data(housing)
housingTab <- xtabs(Freq ~ Sat + Infl + Type + Cont, data = housing)
ht <- as.gmData(housingTab)
marg1 <- mim("Sat:Infl:Cont//", data=ht)
testdelete("Sat:Cont",marg1)
## Try deleting an edge not in the model:
testdelete("Sat:Type",marg1)
testdelete("Sat:Cont",marg1,arg="MJ")
testdelete("Sat:Cont",marg1,arg="M")