birthweight | R Documentation |
The birthweight
numerical vector has 50 observations, which are birthweights in kilograms of infants diagnosed with idiopathic respiratory distress syndrome in a study conducted in the early 1970s at Prince of Wales Hospital, Randwick, New South Wales, Australia.
data(birthweight)
van Vliet, P.K.J. and Gupta, J.M. (1973). THAM v. sodium bicarbonate in idiopathic respiratory distress syndrome. Archives of Disease in Childhood, 48, 249-255.
data(birthweight) hist(birthweight,breaks = 15,col = "gold") selectedBandwidth <- dpik(birthweight) densEst <- bkde(birthweight,bandwidth = selectedBandwidth,range.x = c(0,5)) plot(densEst,col = "blue",lwd = 2,type = "l",xlab = "birthweight (kilograms)", ylab = "density") rug(birthweight,col = "red") abline(h = 0,col = "green3")