ligne moyenne au graphique d'interaction

Question

Est-ce que quelqu'un sait comment ajouter une ligne moyenne sur le graphique d'interaction? Mon code va comme ceci:

#interaction plot
with(datascen_2minBL, interaction.plot(scenario, role, cw2_sum_ampl_per_min, xlab = "baselines", ylab = "2min sumAmplPerMin"))

J'ai plusieurs réponses de chaque participant mesurées à différents moments. Chaque participant a des rôles différents «AO», «RO», «TO» et «AO». Mes lignes d'interaction représentent des moyennes pour chaque rôle. Maintenant, je voudrais ajouter une grande ligne moyenne. Comment pourrais-je y parvenir? JE VOUS REMERCIE!

Answer 1

En utilisant lines, l'utilisation meansans la variable d'interaction tapplydevrait vous donner les valeurs nécessaires. Exemple:

with(ToothGrowth, interaction.plot(dose, supp, len, fixed=TRUE, legend=F))
lines(with(ToothGrowth, tapply(len, dose, mean)), col=2)
legend("topleft", lty=1:2, col=c(1, 1, 2), legend=c("OJ", "VC", "grand mean"), 
       title="supp", bty="n", cex=.9)