<div dir="ltr">Olá pessoal, gostaria mais uma vez da ajuda de vocês.<div><span style="background-color:rgb(255,255,255)"><br></span></div><div><span style="background-color:rgb(255,255,255)">Eu estou precisando criar uma função no R que tem três condições e após testar todas as condições o programa me retorne um resultado na forma de vetor para cada valor (input) na função.</span></div><div><span style="background-color:rgb(255,255,255)">Segue o código que consegui fazer até agora:</span></div><div><span style="background-color:rgb(255,255,255)"><br></span></div><div><div><span style="background-color:rgb(255,255,255)">x=c(-5,-4,-3,-2,-1,0,1,2,3,4,5);x</span></div><div><span style="background-color:rgb(255,255,255)"><br></span></div><div><span style="background-color:rgb(255,255,255)">fr=function(x){</span></div><div><span style="background-color:rgb(255,255,255)">  r=numeric(length = length(x));</span></div><div><span style="background-color:rgb(255,255,255)">  for(i in seq(along=x)){</span></div><div><span style="background-color:rgb(255,255,255)">    if(x<-3){r[i]=0}</span></div><div><span style="background-color:rgb(255,255,255)">    else if(x>=-3 && x<=2){r[i]=3*x}</span></div><div><span style="background-color:rgb(255,255,255)">    else{r[i]=1}</span></div><div><span style="background-color:rgb(255,255,255)">  }</span></div><div><span style="background-color:rgb(255,255,255)">  return(r)</span></div><div><span style="background-color:rgb(255,255,255)">}</span></div><div><span style="background-color:rgb(255,255,255)"><br></span></div><div><span style="background-color:rgb(255,255,255)">rs=fr(x);rs</span></div><div><span style="background-color:rgb(255,255,255)"><br></span></div><div><span style="background-color:rgb(255,255,255)">O resultado saí: <span style="color:rgb(0,0,0);font-family:'DejaVu Sans Mono';font-size:13px;line-height:16px;white-space:pre-wrap">0 0 0 0 0 0 0 0 0 0 0</span></span></div><div><span style="color:rgb(0,0,0);font-family:'DejaVu Sans Mono';font-size:13px;line-height:16px;white-space:pre-wrap;background-color:rgb(255,255,255)"><br></span></div><div><font color="#000000" face="DejaVu Sans Mono"><span style="line-height:16px;white-space:pre-wrap;background-color:rgb(255,255,255)">Se eu tenho só um valor no vetor e não utilizo o "for" consigo resolver, mas se o vetor tem mais de um valor dá erro.</span></font></div><div><font color="#000000" face="DejaVu Sans Mono"><span style="line-height:16px;white-space:pre-wrap;background-color:rgb(255,255,255)"><br></span></font></div><div><font color="#000000" face="DejaVu Sans Mono"><span style="line-height:16px;white-space:pre-wrap;background-color:rgb(255,255,255)">Desde já grato pela atenção/ajuda.</span></font></div><div><br></div>-- <br><div dir="ltr"><div>Rodolfo Marcondes Silva Souza</div><div>Engenheiro Agrônomo</div><div>Mestre em Produção Vegetal - UFRPE/UAST</div><div>Doutorando em Tecnologias Energéticas e Nucleares - UFPE/DEN</div><div><a href="http://lattes.cnpq.br/4486320338778858" target="_blank">Currículo Lattes</a><br></div><div><br></div><div><br></div><div><br></div>
</div>
</div></div>