I have response data by market in the format:

head(df)    ID  market  q1  q2    470 France  1   3    625 Germany 0   2    155 Italy   1   6    648 Spain   0   5    862 France  1   7    699 Germany 0   8    460 Italy   1   6    333 Spain   1   5    776 Spain   1   4

and the following frequencies:

table(df$market)    France  140    Germany 300    Italy   50    Spain   75

I need to create a data frame with a sample of 100 responses per market, and all responses without replacement in cases when there's less than 100 of them.

so

table(df_new$market)        France  100        Germany 100        Italy   50        Spain   75

Thanks in advance!