<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.23562">
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT color=#0000ff face=Arial>Não consegui acessar o 
arquivo</FONT><BR><FONT size=2 face=Arial>.</FONT></DIV>
<BLOCKQUOTE 
style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px">
  <DIV dir=ltr>Um for resolve isso:
  <DIV><BR></DIV>
  <DIV>
  <DIV>dados <- read.table('C:/Users/rcoster/Downloads/RCBD_dad_B.RData.txt', 
  header=T)</DIV>
  <DIV><BR></DIV>
  <DIV>mat <- matrix(0, 20, 20)</DIV>
  <DIV>for (i in 1:20) {</DIV>
  <DIV> for (j in i:20) {</DIV>
  <DIV>  mat[i,j] <- mat[j,i] <- t.test(subset(dados, Treat == i)$y, 
  y = subset(dados, Treat == j)$y, var.equal = FALSE)$p.value</DIV>
  <DIV> }</DIV>
  <DIV>}</DIV></DIV>
  <DIV><BR></DIV>
  <DIV>Mas não é o caso de se usar ANOVA e depois Tukey?</DIV></DIV>
  <DIV class=gmail_extra><BR><BR> </DIV></BLOCKQUOTE></BODY></HTML>