Get slots from RCOX model object.
getSlot(object, slot) dimension(object) logL(object) getSlot(object, slot) dataRep(object, slot = NULL) intRep(object, slot = NULL) fitInfo(object, slot = NULL) getcc(object, type) getecc(object) getvcc(object) getedges(object, complement = FALSE)
object
: RCOX model object.slot
: slot.type
: Type of colour class.complement
: If FALSE, the edges of the model is returned. If TRUE, the edges not in the model is returned.data(math) gm = ~al:an:st vcc = list(~me+st, ~ve+an, ~al) ecc = list(~me:ve+me:al, ~ve:al+al:st) m1 <- rcox(gm=gm, vcc=vcc, ecc=ecc, data=math) getecc(m1) getSlot(m1,"type") fitInfo(m1) fitInfo(m1,"K")
Søren Højsgaard, sorenh@math.aau.dk