Блог

Данные, с которыми я работаю, — это births2006.smpl из пакета nutshell. Используя densityplot() функцию в решетке, я смог создать график, который выглядит следующим образом:

Для этого я просто использовал:

 densityplot( ~ births2006.smpl$DBWT | births2006.smpl$DPLURAL, plot.points=FALSE, xlab="Birth Weight", layout=c(1,5))
  

Теперь я пытаюсь наложить все эти кривые плотности на один график плотности, что, как я предполагал, можно сделать с densityplot() помощью функции, но после нескольких часов безуспешных попыток я не совсем уверен. Это график, который я хотел бы создать:

Вам нужно использовать groups аргумент.

 library(nutshell)
data(births2006.smpl)

densityplot(~ DBWT, groups = DPLURAL, data = births2006.smpl,
            plot.points = FALSE, xlab = "Birth Weight")