calc_duration.RdTO BE PRECISED
calc_duration(begin, end = NULL, cal_length = getOption("ava")[["cal_length"]])numeric vector.
numeric vector, default to NULL.
numeric, number of weeks in calendar. Default to
getOption("ava")[["cal_length"]].
numeric vector, taking into case begin > end and inverse.