Update PSig.R