[R-br] Ajuda em uma função

[Sérgio Henrique almeida da silva ju]

Valeu Benilton

Mas a estratégia da semana passada ele calculava em um intervalo:

f = function(dados){
res = vector('numeric', ncol(dados))
for (i in 1:ncol(dados))
  res[i] = cronbach(dados[, -i])$alpha
res
}
f(dados)

Se eu for rodar dessa forma terei que dizendo quais são as colunas, mas
dessa vez a análise é 2 a 2 (colunas) de a1 até an.




Em 19 de junho de 2012 14:52, Benilton Carvalho
<beniltoncarvalho em gmail.com>escreveu:

> exatamente a mesma estrategia do q vc solicitou na semana passada com
> a funcao cronbach().
>
> 2012/6/19 Sérgio Henrique almeida da silva ju <sergio.edfisica em gmail.com>:
> > Olá
> >
> > Estou com mais uma dúvida no desenvolvimento de uma função
> >
> > Preciso analisar um conjunto de dados, porém essa análise é feita a cada
> > duas colunas:
> >
> > a = c(1,3,5,4,3,2,1,4,5,3,4,5,2,1,1,3,4,5,5,3,2)
> > a1 = c(4,5,5,4,4,3,2,1,4,3,4,5,3,2,3,4,5,5,4,4,1)
> > d = c(3,3,4,4,5,4,3,2,4,5,5,3,4,4,5,4,3,2,3,4,5)
> > d1 = c(2,2,3,3,4,3,2,3,4,5,5,5,4,3,2,3,4,5,4,3,2)
> > dados = data.frame(a,a1,d,d1)
> >
> > library(psy)
> > x=kappa(dados[,c(1,2)])
> > x
> > y=kappa(dados[,c(3,4)])
> > y
> > z=kappa(dados[,c(n,n+1)])
> > z
> > Porém gostaria de rodar uma função que calcule isso automaticamente,
> dando
> > todos os resultados, para isso eu daria a coluna de inicio e a coluna
> final.
> >
> > Como posso fazer?
> >
> > --
> > Sérgio Henrique Almeida da Silva Junior
> > Doutorando em Epidemiologia em Saúde Pública
> > Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ
> > http://lattes.cnpq.br/1611345552843383
> > Tel: (21) 94429486/78101651 id: 123*20942
> >
> >
> >
> > _______________________________________________
> > R-br mailing list
> > R-br em listas.c3sl.ufpr.br
> > https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> > Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
> código
> > mínimo reproduzível.
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça
> código mínimo reproduzível.
>



-- 
Sérgio Henrique Almeida da Silva Junior
Doutorando em Epidemiologia em Saúde Pública
Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ
http://lattes.cnpq.br/1611345552843383
Tel: (21) 94429486/78101651 id: 123*20942
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20120619/2fde589b/attachment.html>