gracias Emilio por tu ayuda, la selección es por fila, no por variable
He intentado discriminar cuando solo encuentra una posición en la fila que
es el máximo, pero el ahorro de tiempo no es mucho aunque algo es algo
Creo que el tiempo se consume en la parte del ELSE, y aunque entiendo que
se tie
Te quería echar una mano pero no veo el objetivo del proceso.
A ver si lo voy entendiendo: "Supongamos que tenemos esta matriz, se quiere
conseguir para el mayor valor por fila tomar el valor de la posición que ocupa
la primera columna "Var" en base a la columna elegida y si hay varios valores
gracias por tus comentarios.
lo que dices es asi, excepto cuando hay varios máximos iguales entonces se
ejecuta f5 para saber cual de ellos es el elegido, y a continuación se hace
lo mismo que has puesto en la frase, es decir elegir el valor de la columna
var que ocupa dicha posición del elegido
Si puedes comentar la lógica de f5 (caso en el que haya varios valores
máximos), es que no la termino de entender...
Gracias,
Carlos.
El lun, 14 dic 2020 a las 12:25, Carlos Santos ()
escribió:
> gracias por tus comentarios.
>
> lo que dices es asi, excepto cuando hay varios máximos iguales e
Aunque no entiendo el objetivo final, te apunto un par de cosas, por si te
sirven.
Primero probaría lo que te dije de usar data.table y tratar de vectorizar lo
máximo.
Luego puedes probar algo así mediante el tidyverse:
tu_dataframe %>%
rowwise(var) %>%
mutate(maximo = max(c_across(starts_with
Hola, como andan!
Tengo una base con información de envío de botiquines por año y mes. Tengo
columna año y mes por separado y las quiero unir y transformar a formato
fecha.
Lo necesito en formato fecha para poder ordenar el data.frame al aplicar
función pivot_wider.
botiquines<-base_agregada_boti
Hola,
Puedes crear una nueva variable en la que se convierta los "meses-año" en
eso fechas. Y luego ordenar por ello.
De hecho recientemente lubridate añadió la función para tratar los
"meses-año" con "*my()*".
Also así como:
library(lubridate)
botiquines<-base_agregada_botiquines_anio_mes %>%