Olá,
tenho um banco de dados em que eu usei o tidyr::spread o que resultou em uma informação espalhada por várias linhas. Gostaria de juntar as diferentes linhas em uma só. Exemplo:
df <- data.frame(obs = c(1,1,1,2),
msgA = c("A", NA, NA, "A" ),
msgB = c(NA,"B",NA, NA),
msgC = c(NA,NA,"C", NA))
#O que eu tentei:
library(dplyr)
df %>%
group_by(obs) %>%
mutate(msg = paste(msgA, msgB, msgC, sep=", ")) %>%
select(-c(2:4))
# Resultado que eu queria:
#
# > df
# obs msg
# 1 A, B, C
# 2 A
Agradeço pela ajuda!