#variables with common number of degrees
# default labels for variable degrees
nvar <- 3
deg <- 4
LexSep <- LexSeparation(nvar=nvar, deg=deg, type= "symmetric", "asymmetricLower")
#user supplied variable degree labels
nvar <- 3
deg <- c("a","b","c","d")
LexSep <- LexSeparation(nvar=nvar, deg=deg, type= "symmetric", "asymmetricLower")
#variables with different numbers of degrees
# default labels for variable degrees
nvar <- 3
deg <- c(4,2,3)
LexSep <- LexSeparation(nvar=nvar, deg=deg, type= "symmetric", "asymmetricLower")
#user supplied variable degree labels
nvar <- 3
deg <- list(c("a","b","c","d"),c("0","1"),c("x","y","z"))
LexSep <- LexSeparation(nvar=nvar, deg=deg, type= "symmetric", "asymmetricLower")
Run the code above in your browser using DataLab