Text this: An introduction to acceptance sampling and SPC with R /