reformat seqs$segments as a legend to insert into segment plot
segments(segs)
segs
return value of dpseg::dpseg()
reformatted matrix suitable for printing
seg<-segments(segs)