NEP A R function to calculate the effective number of parties. Project developed at political science course.