סופיה, נסיכת סקסוניה-ווייסנפלס