Anna Amalia, Sachsen-Weimar-Eisenach, Herzogin