added: pMinusOne.R