<html><body><div style="color:#000; background-color:#fff; font-family:times new roman, new york, times, serif;font-size:12pt"><div><span>Segue abaixo um CMR, espero que ajude.</span></div><div><span><br>teste=matrix(c(3640,4890,4800,4460,<br>               4200,4550,5320,5500,<br>               4700,6020,5250,5580, <br>               5300,5900,5150,5560) , nrow = 4,  byrow = TRUE,<br> dimnames = list(1 : 4,c("Trat1", "Trat2", "Trat3","Trat4")));teste<br>friedman.test(teste) <br><br>pvalor=friedman.test(teste)$p.value<br>alfa=0.05<br>resposta<-function(pvalor) {<br>if(pvalor<alfa)      {  cat("pvalor é ",pvalor, "   logo é pequeno >>>  rejeita Ho ","\n")   
 }<br>else if(pvalor>=alfa)    {  cat("pvalor é  ",pvalor, "  logo é grande >>> NÃO rejeita Ho  ","\n")    } <br>}<br>resposta(pvalor)<br></span></div><div><br></div><div>##########CASO FOR NECESSÁRIO##############<br><span></span></div><div><span>#COMPARAÇÕES MULTIPLAS<br>resposta=c(3640,4890,4800,4460,4200,4550,5320,5500,4700,6020,5250,5580,5300,5900,5150,5560) <br>tratamento = rep(1:4, c(4,4,4,4)) <br>bloco=rep(1:4,4)<br><br><br>require(agricolae)<br>comparison<-friedman(bloco,tratamento,resposta,alpha=0.05, group=TRUE,main="Teste de Friedman")</span></div><div><br><blockquote style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; margin-top: 5px; padding-left: 5px;">  <div style="font-family: times new roman, new york, times, serif; font-size: 12pt;"> <div style="font-family: times new roman, new york, times, serif; font-size: 12pt;"> <font size="2" face="Arial"> <hr
 size="1">  <b><span style="font-weight:bold;">De:</span></b> Fernanda Balbino <ferbalbino@yahoo.com.br><br> <b><span style="font-weight: bold;">Para:</span></b> Lista R <r-br@listas.c3sl.ufpr.br> <br> <b><span style="font-weight: bold;">Enviadas:</span></b> Terça-feira, 22 de Novembro de 2011 15:57<br> <b><span style="font-weight: bold;">Assunto:</span></b> [R-br] Teste de Friedman<br> </font> <br><div id="yiv79023739"><div><div style="color:#000;background-color:#fff;font-family:tahoma, new york, times, serif;font-size:10pt;"><div>Olá, boa tarde!<br></div><div><br></div><div>Estou tentando fazer o teste de friedman e utilizei duas ferramentas que o R oferece. Porém me dá resultados diferentes. Utilizei no pacote pgirmess o friedmanmc para comparação multipa e o R me deu o resultado em que em alguns casos não há diferença significativa. E utilizei do pacote agricolae o friedman que me dá como resposta que somente existem
 diferenças significativas. </div><div>Alguém já utilizou algumas destas funções ou conhece para me explicar por que da diferença? A função friedmanmcdo pacote pgirmessme parece ser mais comleta.</div><div><br></div><div>Muito obrigada.</div><div>Fernanda Balbino.<br></div></div></div></div><br>_______________________________________________<br>R-br mailing list<br><a ymailto="mailto:R-br@listas.c3sl.ufpr.br" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br><br> </div> </div> </blockquote></div>   </div></body></html>