editMIM {mimR}R Documentation

Editing a mim model object

Description

Editing a mim model object by adding/deleting edges.

Usage

editmim(obj, deleteEdge=NULL, addEdge=NULL, haddEdge=NULL,
                    deleteTerm=NULL, addTerm=NULL)
testdelete(edge, obj, arg=NULL)

Arguments

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

Details

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

Value

A new mim model object

Note

Before using mimR, make sure that the MIM program is runnning.

Author(s)

Søren Højsgaard, sorenh@agrsci.dk

References

David Edwards, An Introduction to Graphical Modelling, Second Edition, Springer Verlag, 2000

See Also

See Also as modelTest

Examples

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")


[Package mimR version 2.0.3 Index]