str(DaphniaResistance)
bwplot(resistance ~ density, DaphniaResistance)
# with such a small data set, we can display all the data
# rather than a summary
xyplot(resistance ~ density, DaphniaResistance)
histogram( ~ resistance| density, DaphniaResistance,
strip=FALSE, strip.left = TRUE,
layout=c(1,3)
)
Run the code above in your browser using DataLab