定义与一个事件同时发生的事件

Question

我有一系列时间序列：

time <-c("01-01-1970","01-01-1971","01-01-1971","01-01-1972")
event <-c("A","A","B","B")

df <- data.frame(time, event)

time event
1 01-01-1970     A
2 01-01-1971     A
3 01-01-1971     B
4 01-01-1972     B

现在，我想将同时发生的事件放在一行中。在我的例子中，这将是第2行和第3行。结果应如下所示：

时间事件

1 01-01-1970     A
2 01-01-1971     A & B
4 01-01-1972     B

任何想法如何做到这一点？

最佳， 菲利克斯

Answer 1

您可以使用聚合：

aggregate(df$event,by=list(df$time),FUN= paste,collapse = " & ")