计算条件之间的绝对差值'；使用dplyr跨时间的值

我想比较不同时间条件下的绝对差异。例如，这里我有两个条件（A和B），每个条件都有它自己的时间值（1:3）

任何建议都将不胜感激

模列顺序：

df %>% spread(condition, value) %>%
    mutate(Diff=abs(abs(A) - abs(B))) %>%
    gather(condition, value, -time)

---

aggregate

将起到以下作用：

dif <- aggregate(df$value, list(df$time), function(x) abs(diff(abs(x))))
dif <- data.frame(condition = "Diff", time = dif[,1], value = dif[,2])
dif <- rbind(df, dif)
dif

   condition time value
1         A    1    -2
2         B    1     3
3         A    2     5
4         A    3     1
5         B    2     1
6         B    3     6
7      Diff    1     1
8      Diff    2     4
9      Diff    3     5

dif
ggplot(a, aes(x=time,y=value,color= condition)) +stat_summary(fun.y="mean", geom="line")

df %>% spread(condition, value) %>%
    mutate(Diff=abs(abs(A) - abs(B))) %>%
    gather(condition, value, -time)

dif <- aggregate(df$value, list(df$time), function(x) abs(diff(abs(x))))
dif <- data.frame(condition = "Diff", time = dif[,1], value = dif[,2])
dif <- rbind(df, dif)
dif

   condition time value
1         A    1    -2
2         B    1     3
3         A    2     5
4         A    3     1
5         B    2     1
6         B    3     6
7      Diff    1     1
8      Diff    2     4
9      Diff    3     5