Estimado Wilmer Contreras Sepulveda
Me parece buena la sugerencia de Jorge, hay muchas formas, yo aparte de la
sugerencia que le hicieron le agrego otras dos, en cualquier buscador las
palabras claves son R AUC, y el artículo
https://www.r-bloggers.com/calculating-auc-the-area-under-a-roc-curve/ ,
lógicamente aparecerán tantas alternativas que puede llegar a confundirse
respecto a cuál es conveniente para su caso.
Javier Rubén Marcuzzi
De: Jorge I Velez
Enviado: jueves, 31 de agosto de 2017 22:43
Para: WILMER CONTRERAS SEPULVEDA
CC: R-help-es
Asunto: Re: [R-es] Area bajo la curva
Buenas noches, Wilmer.
Puedes intentar la aproximación sugerida en
https://stackoverflow.com/questions/4954507/calculate-the-area-under-a-curve
## preparación
x <- c(1,2,3,4,5,6,7,8,9,10)
y <- c(0,2,15,30,50,NaN,NaN,10,2,1)
d <- data.frame(x, y)
d <- d[complete.cases(d),]
id <- order(d$x)
## cálculo
require(zoo)
with(d, sum(diff(x[id])*rollmean(y[id],2)))
## [1] 169.5
Espero sea de utilidad.
Jorge.-
2017-08-31 19:17 GMT-05:00 WILMER CONTRERAS SEPULVEDA <wilmercs en
ufps.edu.co>
:
> Buenas noches.
>
> Quisiera saber si existe una libreria o función que me calcule el área bajo
> la curva de dos vectores de números. Ademas esta debe tener en cuenta si
> existen datos faltantes o NaN.
>
> Por ejemplo calcular el área bajo la curva del vector en el eje x:
>
> x<- c(1,2,3,4,5,6,7,8,9,10)
>
> y el vector en el eje y:
>
> y<-c(0,2,15,30,50,NaN,NaN,10,2,1)
>
>
> Muchas gracias.
>
> --
>
> *Wilmer Contreras Sepulveda*
>
> *Grupo de Investigación en Desarrollo de Microelectronica Aplicada*
> *Universidad Francisco de Paula Santander *
>
> [[alternative HTML version deleted]]
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
[[alternative HTML version deleted]]
_______________________________________________
R-help-es mailing list
R-help-es en r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
[[alternative HTML version deleted]]