Creating sample weights, for different regions in r

Question

I have a data set, Population_percentages, with the population percentages for each municipality as follows (example dput listed at the end of the