
<html><head></head><body><div class="yahoo-style-wrap" style="font-family:Helvetica Neue, Helvetica, Arial, sans-serif;font-size:13px;"><div><div><br>Prezados, bom dia.<br>Alguém sabe como estimar "variance between groups" e "variance within groups" no modelo abaixo?</div><div>y <- c(1,2,3, 5,9,8, 2,3,4, 9,7,8 )<br>x <- as.factor(rep(letters[1:4], each=3))<br>library(nlme)<br>model <- gls(y~x, weights = varExp())</div><div>Desde já agradeço</div><div>Luiz</div></div><b></b><i></i><u></u><sub></sub><sup></sup><strike></strike><div><br></div></div></body></html>