I am estimating a latent profile analysis. I made the graph with the following code:
y1[1:158, ] %>%
select(BIEPSA, IAB, IDS, AFN_EMO, EVT_EMO, EEA_EMO, REP_RAC, RLG_RAC, FSP_RAC, BAS_RAC) %>%
single_imputation() %>%
estimate_profiles(2) %>%
plot_profiles(add_line = TRUE, sd = FALSE, rawdata = FALSE, bw = FALSE, ci = NULL)
It results in the left figure.
However, I want to put an asterisk over the pair of points for each category that shows statistically significant differences. Something like what is shown in the right figure.
Actually I have no idea about how to solve this problem