Eleonore Dorothea, Sachsen-Weimar, Herzogin