uG <- ug(~me:ve,~me:al,~ve:al,~al:an,~al:st,~an:st)
closure("me", uG)
getCliques( uG )
amat1 <- graphNEL2M( uG )
getCliques( amat1 )
amat1 <- graphNEL2M( uG, result="Matrix" )
getCliques( amat1 )
Run the code above in your browser using DataLab