Lander Chp 11 mapply function to LISTS only