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"))
result_ISCA_clustertable <- ISCA_clustertable(data = ISCA_step1,
cluster_vars = c("native", "education", "age", "female",
"discrimination", "religiosity"), draws = 5);
Run the code above in your browser using DataLab