[Diagnosismed-list] coeficiente de variabiliade

[Pedro Emmanuel Alvarenga Americano do Brasil]

Colegas de DiagnosisMed,

Segue uma pequena função que fiz pra estimativa de coefiente de
variabiliade. ha um tempo atras eu procurei alguams coisa de confiabilidade
no R e achei o grafico de Altman e Bland, ICCC, kappa... mas nao tinha
achado o cv e nem um treco que eu acho bem legal chamado survival-agreement
plot.

O primeiro é bem simples e segue... o segundo eu vou mandar uma versao
inicial para voces pra frente mas vou precisar de ajuda pois tem um log-rank
no meio que certamente nao saberei implantar.

O meu problema é que eu nao tenho dados de confiabilidade para testar a
função... por favor testem ou comentem pra ficar mais elegante!

CV<-function(obs1,obs2){
  x<-mean(rbind(obs1,obs2))
  v<-((obs1-x)^2)+((obs2-x)^2)
  cv<-(sqrt(v)/x)*100
  cvall<-mean(cv)
  return(cvall)
}

valores proximos de 0 sao considerados como de boa confiabilidade.

-- 
Abraço forte e que a força esteja com você,
Pedro Emmanuel
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.r-forge.r-project.org/pipermail/diagnosismed-list/attachments/20090314/9fc05bd6/attachment.htm