search for: efe_r

Displaying 4 results from an estimated 4 matches for "efe_r".

2004 May 27
2
ANOVA and contrasts
...interaction.plot(e, r, y, col = 'blue', ylab = 'y', xlab = 'r') av1 = aov(y ~ r*e) av2 = aov(y ~ r/e) efR_E = summary(av2, split = list('r:e' = list('e1 vs e2/r1' = 1, 'e1 vs e2/r2' = 2, 'e1 vs e2/r3' = 3))) av3 = aov(y ~ e/r) efE_R = summary(av3, split = list('e:r' = list('r/e1' = c(1,3), 'r/e2' = c(2,4)))) # ------------------------------Begin the problem------------------------- # # I woud like to compare r/e1 (SS = 87.122 with 2 GL) like this: # r1 vs (r2,r3 ) / e1 # r2 vs r3 / e1 # And compare r...
2004 May 26
0
R: Help (two-way analysis of variance with contrasts)
...interaction.plot(e, r, y, col = 'blue', ylab = 'y', xlab = 'r') av1 = aov(y ~ r*e) av2 = aov(y ~ r/e) efR_E = summary(av2, split = list('r:e' = list('e1 vs e2/r1' = 1, 'e1 vs e2/r2' = 2, 'e1 vs e2/r3' = 3))) av3 = aov(y ~ e/r) efE_R = summary(av3, split = list('e:r' = list('r/e1' = c(1,3), 'r/e2' = c(2,4)))) mds = model.tables(av1, ty = 'means') detach(df) cat('\nData:'); cat('\n') print(df) cat('\nMeans:'); cat('\n') print(mds) cat('\nANOVA:'); cat(...
2004 May 26
0
Aid on two-way ANOVA with contrasts
...interaction.plot(e, r, y, col = 'blue', ylab = 'y', xlab = 'r') av1 = aov(y ~ r*e) av2 = aov(y ~ r/e) efR_E = summary(av2, split = list('r:e' = list('e1 vs e2/r1' = 1, 'e1 vs e2/r2' = 2, 'e1 vs e2/r3' = 3))) av3 = aov(y ~ e/r) efE_R = summary(av3, split = list('e:r' = list('r/e1' = c(1,3), 'r/e2' = c(2,4)))) mds = model.tables(av1, ty = 'means') detach(df) cat('\nData:'); cat('\n') print(df) cat('\nMeans:'); cat('\n') print(mds) cat('\nANOVA:'); cat(...
2004 May 31
0
Doubts on anova and use of contrasts in multcomp package
...r') av1 = aov(y ~ r*e) av2 = aov(y ~ r/e) efR_E = summary(av2, split = list('r:e' = list( 'e1 vs e2/r1' = 1, 'e1 vs e2/r2' = 2, 'e1 vs e2/r3' = 3))) av3 = aov(y ~ e/r) efE_R = summary(av3, split = list('e:r' = list( 'r/e1' = c(1,3), 'r/e2' = c(2,4)))) mds = model.tables(av1, ty = 'means') detach(df) cat('\nData:'); cat('\n') print(df) cat('\nMeans:'); cat('...