R model and alphaModel scripts