Vulnerability Index Analysis R Code (PCA and ordinal Logistic regression)