Create initializePgmFactor.R