Improvement for time_length computation with intervals

Following discussions in https://github.com/hadley/lubridate/pull/288
This does not work on period with lenth > 1. Solution must be vectorized.