Alguém?<br><br><div class="gmail_quote">Em 14 de junho de 2012 15:52, Sérgio Henrique almeida da silva ju <span dir="ltr">&lt;<a href="mailto:sergio.edfisica@gmail.com" target="_blank">sergio.edfisica@gmail.com</a>&gt;</span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Olá<div><br></div><div>Gostaria de fazer uma função e como não entendo nada, gostaria de pedir ajuda de vocês</div><div>
<br></div><div>Eu uso o Alfa de Cronbach para analisar a consistência interna de uma escala, normalmente se calculo o alfa total e o alfa se uma variável for retirada.</div>
<div>O alfa total é fácil de fazer, porém quando eu vou fazer o calculo de quando retiro uma variável tenho que fazer tudo manualmente.</div><div><br></div><div>Ex.:</div><div><br></div><div><div>a = c(1,3,5,4,3,2,1,4,5,3,4,5,2,1,1,3,4,5,5,3,2)</div>

<div>b = c(4,5,5,4,4,3,2,1,4,3,4,5,3,2,3,4,5,5,4,4,1)</div><div>c = c(3,3,4,4,5,4,3,2,4,5,5,3,4,4,5,4,3,2,3,4,5)</div><div>d = c(2,2,3,3,4,3,2,3,4,5,5,5,4,3,2,3,4,5,4,3,2)</div><div>dados = data.frame(a,b,c,d)</div><div>
<br>
</div><div>library(psy)</div><div><br></div><div># Alfa Total</div><div><br></div><div>cronbach(dados[,1:4])</div><div><br></div><div>alfa total = 0.5324005</div></div><div><div><br></div><div><br></div><div>Agora preciso retirar a variável &quot;a&quot; e rodar novamente o calculo, depois colocar ela denovo no banco e retirar a variável &quot;b&quot; e assim sucessivamente, dessa forma terei o valor do alfa caso eu retire uma variável.</div>

<div><br></div><div># Alfa retirando a variável</div><div><br></div><div>a = 0.220339</div><div>b = 0.3239247</div><div>c = 0.7669716</div><div>d = 0.2198046</div><div><br></div><div>Qual a melhor forma de fazer isso através de uma função?</div>

<div><br></div><div>Abraços</div><span class="HOEnZb"><font color="#888888"><div><br></div>-- <br>Sérgio Henrique Almeida da Silva Junior<br>Doutorando em Epidemiologia em Saúde Pública<br>Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ<br>
<a href="http://lattes.cnpq.br/1611345552843383" target="_blank">http://lattes.cnpq.br/1611345552843383</a> <br>
Tel: (21) 94429486/78101651 id: 123*20942<br><br><br>
</font></span></div>
</blockquote></div><br><br clear="all"><div><br></div>-- <br>Sérgio Henrique Almeida da Silva Junior<br>Doutorando em Epidemiologia em Saúde Pública<br>Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ<br><a href="http://lattes.cnpq.br/1611345552843383">http://lattes.cnpq.br/1611345552843383</a> <br>
Tel: (21) 94429486/78101651 id: 123*20942<br><br><br>