`rep(seglength,nrow(a))` ?