Tag: TIDYVERSE
Déjame saber si necesito un ejemplo ficticio para esto, pero básicamente tengo un df de subgrupos, cada subgrupo tiene una longitud diferente (normalmente 30-35k valores). Me gustaría unir en un vector con reciclaje parcial de vectores de c(1:200). A partir de esta pregunta, tengo la idea de que puedo usar . . . Read more
Tengo algunos datos de series temporales que se parecen a lo siguiente: df % group_by(id) %>% mutate(lag_value = lag(value, 1L)) Pero esto devuelve valores de la fila anterior en lugar del mes anterior. ¿Cómo puedo hacerlo para que la salida de los datos sea: id year_mon value lag_value 001 2021-01 . . . Read more
Cuando se utiliza ‘reduce’, combina una lista a ‘final0′ (consulte la imagen a continuación), ¿cómo mutar la nueva variable ‘amountfrom’ de ‘? Mi código muestra error. ¡Gracias! library(tidyverse) table_base <- data.frame(cat=c(“a”,”b”,”c”,”d”)) table_a <- data.frame(cat=c(“a”,”b”), value=c(1,2)) table_b <- data.frame(cat=c(“a”,”c”,”d”), value=c(7,9,10)) final_0<- reduce(list(table_base,table_a,table_b),left_join,by=’cat’) %>% mutate(amount=coalesce(!!!select(.,starts_with(‘value’)))) # El siguiente código muestra error [no . . . Read more
Quiero escribir una función que una dos tibbles, con la columna unida del segundo tibble especificada en los argumentos de la función. Tengo df1 <- tibble(NUMBER = c(1,4)) df2 <- tibble(ORDER = 1:5, DISORDER = 5:1, WORD = c(“The”, “quick”, “brown”, “fox”, “jumped”)) Quiero chozer(df1, df2, ORDER) para obtener tibble(NUMBER . . . Read more
Creo que estoy pasando por alto algo importante. Cada vez que intento separar una columna que tiene delimitador “.”, falla. ¿Alguien tiene alguna idea de por qué? library(tidyverse) library(reprex) check=data.frame(time=c(“1.2″,”1.3”),light=c(“A”,”B”)) check > time light > 1 1.2 A > 2 1.3 B check %>% tidyr::separate(time,c(‘time2′,”node”),sep=’.’) > Warning: Expected 2 pieces. . . . Read more