<html><body><div style="color:#000; background-color:#fff; font-family:arial, helvetica, sans-serif;font-size:12pt"><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; "><span>Olá o comando qq$expected do exemplo abaixo mostra as frequencias</span></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; "><span>esperadas ! Espero ter ajudado ! Alex.</span></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; "><br></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; "><br></div><div><div><span class="Apple-style-span" style="font-size: 16px;"><br></span></div><div><span class="Apple-style-span" style="font-size: 16px;">a=scan()</span></div><div><span class="Apple-style-span" style="font-size: 16px;">3 5 31</span></div><div><span class="Apple-style-span" style="font-size: 16px;">0 3 5</span></div><div><span class="Apple-style-span" style="font-size:
 16px;"><br></span></div><div><span class="Apple-style-span" style="font-size: 16px;"><br></span></div><div><span class="Apple-style-span" style="font-size: 16px;">z=matrix(a,nrow = 2, ncol=3, byrow=TRUE,dimnames = list(c("fem","masc"),</span></div><div><span class="Apple-style-span" style="font-size: 16px;">c("em parte","NÃO","sim") ) ) </span></div><div><span class="Apple-style-span" style="font-size: 16px;"><br></span></div><div><span class="Apple-style-span" style="font-size: 16px;">z</span></div><div><span class="Apple-style-span" style="font-size: 16px;"><br></span></div><div><span class="Apple-style-span" style="font-size: 16px;">require(gregmisc)</span></div><div><span class="Apple-style-span" style="font-size: 16px;">CrossTable(z, expected = TRUE,format="SPSS")</span></div><div><span class="Apple-style-span" style="font-size: 16px;"><br></span></div><div><span class="Apple-style-span" style="font-size:
 16px;">qq=chisq.test(z);qq[]</span></div><div><span class="Apple-style-span" style="font-size: 16px;"><br></span></div><div><span class="Apple-style-span" style="font-size: 16px;">pvalor=qq$p.value</span></div><div><span class="Apple-style-span" style="font-size: 16px;">pvalor</span></div><div><span class="Apple-style-span" style="font-size: 16px;">alfa=0.05</span></div><div><span class="Apple-style-span" style="font-size: 16px;">teste<-function(pvalor) {</span></div><div><span class="Apple-style-span" style="font-size: 16px;">if(pvalor>=alfa)      {  cat("NÃO rejeita Ho, pois pvalor =   ",pvalor, "  logo</span></div><div><span class="Apple-style-span" style="font-size: 16px;">proporção é igual para as categorias ","\n")    }</span></div><div><span class="Apple-style-span" style="font-size: 16px;">else if(pvalor<alfa)     {  cat("REJEITA Ho,  pois pvalor =   ",pvalor, "
  logo a</span></div><div><span class="Apple-style-span" style="font-size: 16px;">proporção É DIFERENTE para as categorias ","\n")    } </span></div><div><span class="Apple-style-span" style="font-size: 16px;">}</span></div><div><span class="Apple-style-span" style="font-size: 16px;">teste(pvalor)</span></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; "><br></div><div><span class="Apple-style-span" style="font-size: 16px;">qq$expected</span><br></div><blockquote style="font-family: arial, helvetica, sans-serif; font-size: 12pt; border-left-width: 2px; border-left-style: solid; border-left-color: rgb(16, 16, 255); margin-left: 5px; padding-left: 5px; "><div style="font-size: 12pt; font-family: arial, helvetica, sans-serif; "><div style="font-size: 12pt; font-family: 'times new roman', 'new york', times, serif; "><font size="2" face="Arial"><hr size="1"><b><span style="font-weight:bold;">De:</span></b>
 Alberto Senra <alberto.senra@gmail.com><br><b><span style="font-weight: bold;">Para:</span></b> Grupo-R <r-br@listas.c3sl.ufpr.br><br><b><span style="font-weight: bold;">Enviadas:</span></b> Quinta-feira, 30 de Junho de 2011 15:09<br><b><span style="font-weight: bold;">Assunto:</span></b> [R-br] Como inserir frequências esperadas em um teste de Chi-quadrado<br></font><br><div id="yiv1706054070">
 
<div dir="ltr">
<div style="color: rgb(0, 0, 0); font-size: 12pt; font-family: Calibri; ">
<div>Olá pessoal! Tenho que fazer um teste simples de chi-quadrado. Eu tenho as 
frequências esperadas mas não consigo inserir estas frequências para poder 
calcular o teste. Alguém pode me ajudar?</div>
<div> </div>
<div>Obrigado</div>
<div> </div>
<div style="color: rgb(0, 0, 0); font-size: 12pt; font-family: Calibri; ">Alberto 
Senra Gonçalves, Ph.D Student<br>Post Graduate Course in Animal 
Biodiversity<br>Laboratory of Carcinology<br>Biological Department, Universidade 
Federal de Santa Maria<br>Avenida Roraima, number 1000, Cidade Universitária, 
Bairro Camobi, Santa Maria - RS, CEP: 97.105-900<br>Email: 
alberto.senra@gmail.com<br>Fone:<br>[0055] (55) 3212-5402 (Home fone)<br>[0055] 
(55) 9966-7770 (celular fone)<br>[cod. Brazil]<br>(cod. city/Santa 
Maria)</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>