Tengo un df original enorme que contiene datos de temperatura y peso. Al hacer
ndatos <- df %>%
group_by(tt) %>%
summarise(peso=mean(peso),
n=n())%>%
data.frame()
puedo ver que para cada categoría de temperatura tengo diferente número de observaciones, así:
df
Temp Obs Pesomedio
-3 782 40
-2 815 32
-1 3586 52
0 561 78
1 256 89
2 758 99
Lo que debo hacer es eliminar de cada categoría de temperatura el 1% de los valores de peso más altos y más bajos sobre la media del valor. No sé cómo hacerlo de forma sencilla y eficiente, porque lo primero que se me ha ocurrido es hacer un subset por categoría, luego sacar la media y luego eliminar manualmente los valores más altos y más bajos sin que estos superen el 2% del total... pero esto me llevaría horas o días.
Espero haberme explicado y que me puedan ayudar. Gracias!