Update pexp.R