-1

Eu tenho o seguinte banco de dados como exemplo e o resultado que eu espero:

Exemplo


No caso os valores no novo dataframe referem-se aos dias, que é a diferença da última data de uma categoria em relação a primeira da mesma categoria.

1

2 Respostas 2

4

É possível fazer o que quer com a função R base aggregate.

Grupo <- c("A", "A", "A", "B", "B", "C", "C")
Data <- c("01/02/2017", "15/02/2017", "20/03/2017", "18/02/2017", "01/03/2017", "15/02/2017", "20/02/2017")
dados <- data.frame(Grupo, Data)

dados$Data <- as.Date(dados$Data, "%d/%m/%Y")

result <- aggregate(Data ~ Grupo, dados, function(d) d[length(d)] - d[1])
result
#  Grupo Data
#1     A  47 
#2     B  11 
#3     C   5
2
  • Uma dúvida, antes tem uma variável de número do processo, como ficaria nesse caso:
    – FVasquez
    Commented 29/04/2018 às 13:52
  • @FVasquez É melhor editar a pergunta com os novos dados. Ponha a saída de dput(dados) ou se o banco for muito grande de dput(head(dados, 20)), por favor. Commented 29/04/2018 às 16:37
0

Uma outra forma de fazer isto é usando o pacote dplyr:

library(dplyr)

dados <- tribble(
  ~Grupo, ~Data,
  "A", "01/02/2017", 
  "A", "15/02/2017", 
  "A", "20/03/2017", 
  "B", "18/02/2017", 
  "B", "01/03/2017", 
  "C", "15/02/2017", 
  "C", "20/02/2017"
) %>%
  mutate(Data = as.Date(Data, format = "%d/%m/%Y"))

result <- dados %>%
  group_by(Grupo) %>%
  summarise(Data = as.integer(max(Data) - min(Data))) %>%
  as.data.frame()

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .