Consider this example:
team <- rep(c("A","B","C"), times=c(7,4,10))
trip <- rep(NA,length(team))
for(i in 1:length(unique(team))){
trip[which(team==unique(team)[i])] <- 1:days[i]
}
obs < -c(rnorm(days[1],100,30), rnorm(days[1],100,5), rnorm(days[1],100,15))
data <- data.frame(team, trip, obs)
boxplot(obs~team, data)
It is pretty clear that the variance in each team is different, but the mean is similar.
How can I infer this statistically? How can I compare intra-group (within-group) variance with the inter-group (between-group) variance?
Var(Y)= E[Var(Y|X)]+Var(E[Y|X])
Interpretation: Let Y be player skill and X be dummies for teams. This says that the variance in player skill is the average within-team variance of skill plus the variance across teams of average within-team skill. IN your case, if the team means are similar, the second term is small.
– CloseToC May 23 '14 at 13:48