?cut        --JIV


2013/7/30 Rodrigo López Correa <rod99hare@gmail.com>

> Estimados quería realizarles una consulta:
>
>
> Trabajo con una tabla con 23 registros, la cual tiene en la columna "*ar4*"
> valores de una variable llamada ranking para cada registro, y una columna
> "percentil" donde le voy a colocar el nivel de percentil en el que se
> encuentra ese valor (ar4) de cada uno de esos 23 registros.
>
> La tabla es la siguiente::
>
>  código padre n ar4        percentil
>  1 27 -0,36  2 18 -0,17  3 17 -0,48  4 16 0,15  5 15 -0,03  6 13 -0,26  7
> 13
> 0,78  8 13 -0,07  9 12 -0,08  10 12 -0,09  11 11 *-0,54*  12 11 -0,13  13
> 10
> 0,04  14 10 -0,30  15 10 0,18  16 10 -0,53  17 9 0,05  18 9 -0,68  19 9 -*
> 0,55*  20 9 -0,48  21 9 0,28  22 9 -0,21  23 9 -0,19
>
>
> Para completar la columna percentil, calculé de acuerdo a los valores de
> "ar4", los percentiles 1%, 5%, 10%, 25%, 50%, 75%, 90%, 95% y 99%
>
> percent<-quantile(tabla$ar4,
> c(0.01,0.05,0.10,seq(0.25,0.75,0.25),0.90,0.95,0.99))
>
> El resultado contenido en el vector percent fue:
>
> 1%                    5%           10%              25%         50%
>           75%
>  -0.65             -0.55           -0.54            -0.42
> -0.16            0.003
>
>     90%                   95%                       99%
>  0.17                     0.27                        0.67
>
>
>  En este caso si el valor es menor o igual al valor contenido con el nombre
> "10%" ( o sea  -0.54) pero mayor al valor contenido en "5%" del vector
> percent, le adjudique el character "10%" en la columna percentil de la
> tabla.
>
> for (i in tabla$ar4){
>   for(i in tabla$percentil){
>     ifelse(tabla[i,"ar4"]<=percent["10%"] & tabla[i,"ar4"]>percent["5%"]),
> tabla[i,"percentil"]<-"10%", tabla[i,"percentil"]<-"NA")
>
>
>   }
> }
>
>
> El problema es cuando corro el script me dió error y no pude seguir, traté
> de solucionarlo pero no he podido.
>
>
>
> Saludos y muchas gracias!
>
> Rodrigo.
>
>         [[alternative HTML version deleted]]
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>

	[[alternative HTML version deleted]]

