<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<div class="moz-cite-prefix">Onde foi definido o k?<br>
<pre class="moz-signature" cols="72">[]s
Leonard de Assis
assis <dot> leonard <at> gmail <dot> com
</pre>
Em 13/09/2012 12:56, Felipe Buchbinder escreveu:<br>
</div>
<blockquote
cite="mid:CAA9iaD0hjv9k0v6HP6Nthjs3+Wo7cPpVaZGjmSbDjWcge+SFLw@mail.gmail.com"
type="cite">Prezados professores,
<div><br>
</div>
<div>Estou com um problema em uma função no R.</div>
<div>A função é a seguinte:</div>
<div><br>
</div>
<blockquote style="margin:0 0 0 40px;border:none;padding:0px">
<blockquote style="margin:0 0 0 40px;border:none;padding:0px">
<blockquote class="gmail_quote" style="margin:0px 0px 0px
0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">resp
<- function(subject,item,trait)<br>
{<br>
<br>
p.vec = NULL<br>
<br>
for(category in 1:k) # k = 5<br>
{<br>
p = ogive ( theta[subject,trait] , a[item] ,
b[item,category] , D ) # aqui é uma logit (D=1) ou probit
(D=1.7)<br>
p.vec = c(p.vec,p)<br>
}<br>
<br>
#Generates a random number<br>
<br>
seed<-runif(1,0.2,0.8)<br>
<br>
#Selects an answer<br>
<br>
temp = which ( p.vec>seed ) <br>
if( length (temp) > 0 ) { resp = max (temp) } else {
resp = 1 }<br>
resp<br>
}</blockquote>
</blockquote>
</blockquote>
<div><br>
</div>
<div><br>
</div>
<div>Esta função está inserida em um loop e deveria me retornar um
número inteiro entre 1 e 5.</div>
<div>Da primeira vez, isto acontece.</div>
<div>Mas a partir da segunda, ela começa a me retornar valores
como 20, 16,...</div>
<div><br>
</div>
<div>Alguma idéia de porque isso acontece???</div>
<div><br>
</div>
<div>Desde já, obrigado!</div>
<div><br>
</div>
<div>Felipe Buchbinder</div>
<div><br>
</div>
<div><br>
</div>
<br>
<fieldset class="mimeAttachmentHeader"></fieldset>
<br>
<pre wrap="">_______________________________________________
R-br mailing list
<a class="moz-txt-link-abbreviated" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a>
<a class="moz-txt-link-freetext" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a>
Leia o guia de postagem (<a class="moz-txt-link-freetext" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</pre>
</blockquote>
<br>
</body>
</html>