es.davy.ai

Preguntas y respuestas de programación confiables

¿Tienes una pregunta?

Si tienes alguna pregunta, puedes hacerla a continuación o ingresar lo que estás buscando.

Tag: TIDYR

Agregación secuencial con una sola llamada a pivot_wider

Considere el dataframe: df <- data.frame(x = c(1,2,1,1), y = c(“a”, “a”, “b”, “a”)) Al aplicar el siguiente código library(tidyverse) df %>% pivot_wider(names_from = y, values_from = y, values_fn = length, names_prefix = “tot_”, values_fill = 0) %>% mutate(per_a = 100*tot_a / rowSums(select(.,starts_with(“tot_”)))) %>% mutate(per_b = 100*tot_b / rowSums(select(.,starts_with(“tot_”)))) se . . . Read more

Regresión “multi-step” con broom y dplyr en R.

Estoy buscando una forma de realizar una regresión “multietapa” con broom y dplyr en R. Uso “multietapa” como marcador para análisis de regresión en los que se integran en el modelo de regresión final elementos de modelos de regresión anteriores, como el ajuste o los residuos. Un ejemplo de tal . . . Read more

Resultado de la regresión guardado de una regresión anidada.

Estoy tratando de exportar la salida de regresión de una regresión anidada, creada utilizando broom y map. Por ejemplo: “`{r} library(tidyverse) library(broom) year <- rep(2014:2015, length.out=10000) group <- sample(c(0,1,2,3,4,5,6), replace=TRUE, size=10000) female <- sample(c(0,1), replace=TRUE, size=10000) smoker <- sample(c(0,1), replace=TRUE, size=10000) dta <- tibble(year = year, group = group, female . . . Read more