Create optMHaic.R