I am using systemfit to model respondents\' prioritization of certain local projects. Their priorities are categorized into six categories.
model1<-pr