Порядок столбцов Modulo:
df %>% spread(condition, value) %>% mutate(Diff=abs(abs(A) - abs(B))) %>% gather(condition, value, -time)