This closure is useful for simulating q inside the sim_survey function

sim_logistic(k = 2, x0 = 3, plot = FALSE)

## Arguments

k The steepness of the curve The x-value of the sigmoid's midpoint Plot relationship

## Examples

logistic_fun <- sim_logistic(k = 2, x0 = 3, plot = TRUE)
logistic_fun(x = 1:10)