分析R图中的线

Question

我有两个不同的折线图（见下图），我想知道线路上下平均的时间。我制作了一个虚拟数据：

> dput(head(dummydata))
structure(list(cond = structure(c(1L, 1L, 1L, 1L, 1L, 1L), .Label = c("Con", 
"t1"), class = "factor"), T = c(1, 2, 3, 4, 5, 6), mean = c(16L, 
7L, 9L, 14L, 8L, 16L)), .Names = c("cond", "T", "mean"), row.names = c(NA, 
6L), class = "data.frame")

我的真实数据比这个更具可变性。 关于如何做到这一点的任何建议？感谢