R: How to preform "quota sampling" on a dataset in R

Question

I am wondering would anyone have any sample code in order to be able to carry out "Quota Sampling" in R?

Thanks in advance!

Update with example dataset:

For example I will need the following

• 5 Abnormal, Occurring on a Wednesday, with Humidity equal to 24
• 3 normal, Occurring on a Workday, with Humidity less than 24

Answer 1

Something like the following may reply to your question :

question1_data=subset(your_data,label==Abnormal & Day=="Wednesday" & Humidity==24)
sample_1=popsamp(5,question1_data)

question2_data=subset(your_data,label==normal & Day=="Workday" & Humidity<24)
sample_2=popsamp(3,question2_data)

Answer 2

The popsamp() function is a function of tigerstats package :

set.seed(1837)
require(tigerstats)
str(iris)
quest_1=subset(iris,Species=="setosa") #selecting a sub group of data
quest_1
x=popsamp(4,quest_1)  # sampling in that group 
x # printing sample