Colegas de DiagnosisMed,<br><br>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. <br>
<br>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.<br><br>O meu problema é que eu nao tenho dados de confiabilidade para testar a função... por favor testem ou comentem pra ficar mais elegante!<br clear="all">
<br>CV<-function(obs1,obs2){<br> x<-mean(rbind(obs1,obs2))<br> v<-((obs1-x)^2)+((obs2-x)^2)<br> cv<-(sqrt(v)/x)*100<br> cvall<-mean(cv)<br> return(cvall)<br>} <br><br>valores proximos de 0 sao considerados como de boa confiabilidade.<br>
<br>-- <br>Abraço forte e que a força esteja com você,<br>Pedro Emmanuel<br>