Please post your code in plaintext form and/or upload a worksheet. Nobody feels like retyping your code. Most people wouldn't want to Answer a Question if they couldn't test that Answer in Mathematica.
See attached file.
Thanks a lot! May I ask which version of Mathematica you're using? It seems I have to upgrade mine to be able to view the file completely.
Mathematica 12.0.