Use a list with specific sample size by group in R and apply it to the dataset

Question

I have a lookup file that looks like this

id   department     sample_size
1    accounting     2
2    finance        3

And I have a dataframe that