R Package for Fitting the Multinomial Probit Model