Map Filter And Reduce Function In Mathematica How To Fill