analytic check mixed designs

[Lakens]

Error rates mixed designs not accurate:
design_result <- ANOVA_design(string = "2b*2w", n = 40, mu = c(0, 0, 0, 0), sd = 2, r = 0.8, labelnames = c("condition", "cheerful", "sad", "voice", "human", "robot"))

power_result <- ANOVA_power(design_result, alpha_level = 0.05,
p_adjust = "none", nsims = 1000)

power_result$plot1

Plots clearly not uniform. Check where this error is caused.

[Lakens]

Fixed.