# NOT RUN {
str.for = "A*(B/E/C)*D"
effectsMatrix= attr(terms(as.formula(paste("~", str.for)), keep.order = TRUE) , "factors")
effectNames = attr(terms(as.formula(paste("~", str.for)), keep.order = TRUE) , "term.labels")
adjustEffectNames(effectsMatrix, effectNames)
# }
Run the code above in your browser using DataLab