durations of the segments add up dc$time_cum <- cumsum(dc$time) svg("NEDC.language.multi.svg", width=8, height=6, pointsize=16) par(las=1) # label rotation...
NEDC.language.multi...