Re: [R-es] resultados de un apply

2021-01-27 Por tema Manuel Mendoza
Gracias Marcelino, tomo nota para la próxima vez que me haga falta.
Manuel

El mié, 27 ene 2021 a las 8:07, Marcelino de la Cruz Rot (<
marcelino.delac...@urjc.es>) escribió:

> Perdón,
>
> preds <- colnames(probs)[apply(probs, 1, which.max)]
>
> El 27/01/2021 a las 7:57, Marcelino de la Cruz Rot escribió:
> >
> > preds <- col.names(probs)[apply(probs, 1, which.max)]
> >
> >
> >
> > El 27/01/2021 a las 4:27, Manuel Mendoza escribió:
> >> Buenos días, de un gbm multinomial obtengo los resultados en
> >> probabilidades, como veis abajo.
> >> Con   preds <- apply(probs, 1, which.max) obtengo la categoría más
> >> probable, pero me la da como 1,1,1,3,2,5,... indicando la posición de la
> >> categoría en vez de su nombre. Con ifelse se puede transformar
> >> fácilmente
> >> pero, quizás, haya una forma de obtenerlo directamente. ¿Lo sabéis?
> >>
> >> CYTERL EXC ME1
> >>   ME2 ME3
> >> [1,] 0.4109855 0.0003585678 0.008226155 0.0010024805 0.011564794
> >> 0.011061570
> >> [2,] 0.4481929 0.0003365305 0.020082853 0.0053111587 0.010587039
> >> 0.016284726
> >> [3,] 0.5991016 0.0002893456 0.004667779 0.0007938136 0.010317520
> >> 0.004139039
> >> [4,] 0.6953976 0.0001788419 0.002542308 0.0004987632 0.006486960
> >> 0.002685069
> >> [5,] 0.1880506 0.0001065788 0.002126477 0.0002694346 0.005070764
> >> 0.005504816
> >> [6,] 0.3271385 0.0001400425 0.002667148 0.0003842037 0.004645430
> >> 0.007562207
> >>
> >> Gracias,
> >> Manuel
> >>
> >> [[alternative HTML version deleted]]
> >>
> >> ___
> >> R-help-es mailing list
> >> R-help-es@r-project.org
> >> https://stat.ethz.ch/mailman/listinfo/r-help-es
> >> .
> >
> >
>
> --
> Marcelino de la Cruz Rot
> Depto. de Biología y Geología
> Física y Química Inorgánica
> Universidad Rey Juan Carlos
> Móstoles España
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


Re: [R-es] resultados de un apply

2021-01-26 Por tema Marcelino de la Cruz Rot

Perdón,

preds <- colnames(probs)[apply(probs, 1, which.max)]

El 27/01/2021 a las 7:57, Marcelino de la Cruz Rot escribió:


preds <- col.names(probs)[apply(probs, 1, which.max)]



El 27/01/2021 a las 4:27, Manuel Mendoza escribió:

Buenos días, de un gbm multinomial obtengo los resultados en
probabilidades, como veis abajo.
Con   preds <- apply(probs, 1, which.max) obtengo la categoría más
probable, pero me la da como 1,1,1,3,2,5,... indicando la posición de la
categoría en vez de su nombre. Con ifelse se puede transformar 
fácilmente

pero, quizás, haya una forma de obtenerlo directamente. ¿Lo sabéis?

    CYT    ERL EXC ME1
  ME2 ME3
[1,] 0.4109855 0.0003585678 0.008226155 0.0010024805 0.011564794 
0.011061570
[2,] 0.4481929 0.0003365305 0.020082853 0.0053111587 0.010587039 
0.016284726
[3,] 0.5991016 0.0002893456 0.004667779 0.0007938136 0.010317520 
0.004139039
[4,] 0.6953976 0.0001788419 0.002542308 0.0004987632 0.006486960 
0.002685069
[5,] 0.1880506 0.0001065788 0.002126477 0.0002694346 0.005070764 
0.005504816
[6,] 0.3271385 0.0001400425 0.002667148 0.0003842037 0.004645430 
0.007562207


Gracias,
Manuel

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
.





--
Marcelino de la Cruz Rot
Depto. de Biología y Geología
Física y Química Inorgánica
Universidad Rey Juan Carlos
Móstoles España

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


Re: [R-es] resultados de un apply

2021-01-26 Por tema Marcelino de la Cruz Rot



preds <- col.names(probs)[apply(probs, 1, which.max)]



El 27/01/2021 a las 4:27, Manuel Mendoza escribió:

Buenos días, de un gbm multinomial obtengo los resultados en
probabilidades, como veis abajo.
Con   preds <- apply(probs, 1, which.max) obtengo la categoría más
probable, pero me la da como 1,1,1,3,2,5,... indicando la posición de la
categoría en vez de su nombre. Con ifelse se puede transformar fácilmente
pero, quizás, haya una forma de obtenerlo directamente. ¿Lo sabéis?

CYTERL EXC ME1
  ME2 ME3
[1,] 0.4109855 0.0003585678 0.008226155 0.0010024805 0.011564794 0.011061570
[2,] 0.4481929 0.0003365305 0.020082853 0.0053111587 0.010587039 0.016284726
[3,] 0.5991016 0.0002893456 0.004667779 0.0007938136 0.010317520 0.004139039
[4,] 0.6953976 0.0001788419 0.002542308 0.0004987632 0.006486960 0.002685069
[5,] 0.1880506 0.0001065788 0.002126477 0.0002694346 0.005070764 0.005504816
[6,] 0.3271385 0.0001400425 0.002667148 0.0003842037 0.004645430 0.007562207

Gracias,
Manuel

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
.



--
Marcelino de la Cruz Rot
Depto. de Biología y Geología
Física y Química Inorgánica
Universidad Rey Juan Carlos
Móstoles España

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es


[R-es] resultados de un apply

2021-01-26 Por tema Manuel Mendoza
Buenos días, de un gbm multinomial obtengo los resultados en
probabilidades, como veis abajo.
Con   preds <- apply(probs, 1, which.max) obtengo la categoría más
probable, pero me la da como 1,1,1,3,2,5,... indicando la posición de la
categoría en vez de su nombre. Con ifelse se puede transformar fácilmente
pero, quizás, haya una forma de obtenerlo directamente. ¿Lo sabéis?

   CYTERL EXC ME1
 ME2 ME3
[1,] 0.4109855 0.0003585678 0.008226155 0.0010024805 0.011564794 0.011061570
[2,] 0.4481929 0.0003365305 0.020082853 0.0053111587 0.010587039 0.016284726
[3,] 0.5991016 0.0002893456 0.004667779 0.0007938136 0.010317520 0.004139039
[4,] 0.6953976 0.0001788419 0.002542308 0.0004987632 0.006486960 0.002685069
[5,] 0.1880506 0.0001065788 0.002126477 0.0002694346 0.005070764 0.005504816
[6,] 0.3271385 0.0001400425 0.002667148 0.0003842037 0.004645430 0.007562207

Gracias,
Manuel

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es