Nothing
library(eyeprocess)
sim <- simulate_multimodal_irt(n_person=80, n_item=12, seed=42)
sim
audit_multimodal_measurement(sim$measurement)
validate_multimodal_irt(sim)
plot(sim, type="latent_correlation")
plot(sim$measurement, type="missingness")
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.