AlcoholProcessingSpeedScript.R