modified kommuneliste.R