How Often Does Yarn Break?

This shiny app works with warpbreaks dataset. The dataset has 54 observations and 3 variables:

1. breaks - number of breaks of thread per loom of wool
   
2. wool - type of wool, either A or B
   
3. tension - high(H), medium(M) of low(L) tension of thread
   

When you choose an x variable, either type of wool or level of tension, the app automatically produces a barplot showing total number of breaks per each level of independent variable. You can find documentation for the app when you click on the "Documenation" tab.

library(gridExtra); library(RGraphics)
tbl <- round(tapply(warpbreaks$breaks, list(warpbreaks$wool, warpbreaks$tension), mean),  2)
tblG <- tableGrob(tbl, theme = ttheme_minimal(), rows = c("wool type A", "wool type B"), 
        cols = c("Low tension", "Medium tension", "High tension"))
grid.arrange(tblG, nrow = 1)

breaks is a dependent variable, and wool and tension are independent parameters. Change in them results in different number of breaks. The yarn was tested on 6 different combination of parameters: AL, AM, AH, BL, BM and BH. Each combination of parameters was tested on 9 looms, which results in 54 observations. Next slide shows that graphically, and interactive version of the same graph can be found on this address.