data(sim_data)
ISCA_step1 <- ISCA_random_assignments(data=sim_data,
filter=native, majority_group=1, minority_group=c(0),
fuzzifier = 1.5, n_clusters=4, draws=5,
cluster_vars= c("female", "age", "education", "income"));
Run the code above in your browser using DataLab