Financial model in R utilizing dividend book-ending