Displaying 1 result from an estimated 1 matches for "ifactor".
Did you mean:
  factor
  
2011 Sep 22
1
Wrapper of linearHypothesis (car) for post-hoc of repeated measures ANOVA
...if (is.null(attr(wframe[[wf]], "contrasts"))){
			contrasts(wframe[[wf]]) <- if
(is.ordered(wframe[[wf]])) aovmlm$icontrasts[2] else
aovmlm$icontrasts[1]
		}
	}
	
	# 3. Check that interacting factors in levelcomb are included in
both the
	# between-subjects and within-subject designs 
	ifactors <- names(levelcomb)
	iterm <- paste(ifactors,collapse=":")
	itermsort <- paste(sort(ifactors),collapse=":")
	anovaterms <-
lapply(strsplit(aovmlm$terms,":"),function(x){paste(sort(x),collapse=":")})
	if (all(is.na(match(anovaterms,itermsort)))){...