# \donttest{
sim <- simulate_fmi_data(N_A = 20, N_B = 20, T_points = 30)
res <- test_strict(sim$Y_mat, sim$group_vec, sim$argvals,
npc = 3, n_perms = 9, alpha = 0.05, progress = FALSE)
print(res$p_value)
# }
Run the code above in your browser using DataLab