Как добавить гауссову кривую к гистограмме, созданной с помощью qplot?

У меня вопрос, вероятно, похожий на Подгонка кривой плотности к гистограмме в R . Используя qplot, я создал 7 гистограмм с помощью этой команды:

 (qplot(V1, data=data, binwidth=10, facets=V2~.)   

Для каждого среза я хотел бы добавить подходящая гауссова кривая. Когда я пытаюсь использовать метод lines () , я получаю сообщение об ошибке:

Error in plot.xy(xy.coords(x, y), type = type, ...) : 
plot.new has not been called yet

Какая команда делает это правильно?