R program for predicting coefficient alpha from a set of IRT parameters