Calculate multiple booleans — sample

This function provides up to the maximum allowed number of responses. Some responses will have less and if your "miss_pct" is greater than zero, some responses will have no selections.

Usage

sample_many(var, d, count = 100)

Arguments

var: string; variable name
d: dataset; contains labels and probabilities
count: integer; number of responses (rows)

Examples

d <- data.frame(variable = "my_letters", type = "select-many", miss_pct = 10,
                options = letters[1:5], labels = letters[1:5], max_opts = 3,
                probability_1 = 9:5, probability_2 = 1:5)

sample_many(var = "my_letters", d = d, count = 10)
#> # A tibble: 10 × 6
#>       id d     b     e     a     c    
#>    <int> <chr> <chr> <chr> <chr> <chr>
#>  1     1 NA    b     e     NA    c    
#>  2     2 d     NA    e     NA    NA   
#>  3     3 d     NA    e     NA    c    
#>  4     4 NA    NA    NA    a     c    
#>  5     5 d     NA    e     NA    NA   
#>  6     6 d     b     e     NA    NA   
#>  7     7 NA    b     NA    a     c    
#>  8     8 NA    NA    NA    a     c    
#>  9     9 d     NA    e     a     NA   
#> 10    10 d     NA    e     NA    NA