Measurement Of The Shape Of The B Quark Fragmentation Function Using Charmed Mesons In Proton-Proton Collisions At A Center Of Mass-Energy Of 13 Tev