shelf1=c(10,6,1,3,2,11,15,10,11,6,2,3,0,0,0,3,3,3,8)


shelf2=c(14,12,9,13,12,13,0,13,7,12,9,11,3,6,12,3,9,12,15,5,12)


shelf3=c(6,8,5,0,8,8,5,7,7,3,10,5,10,5,3,4,6,9,11,11,13,7,2,10,14,3,0,0,6,8,6,3,14,3,3,12)


boxplot(shelf1,shelf2,shelf3,horizontal=TRUE,
        names=c("Shelf 1","Shelf 2","Shelf 3"),
        xlab="Sugar Content",
        ylab="Shelf Level",
        main="Sugar Levels in Cereal",
        col=c("purple","green","orange"))

plot of chunk unnamed-chunk-1