Extension of R Package 'BTYD'