A little bug in jbplot_retro

[Kotkot]

Hi all,

I think there is a little bug in lines 1291, 1322, and 1334 in the jabba_plots.R file (related to the function jbplot_retro, where you added a few lines to put the Mohn's rho value at the top of each panel).

The current code is
legend("top", paste0("Mohn's rho = ",round(mean(rho[i-1,k]),2)),bty="n",y.intersp=-0.2,cex=0.9)

but it should probably be
legend("top", paste0("Mohn's rho = ",round(mean(rho[,k]),2)),bty="n",y.intersp=-0.2,cex=0.9)

so that it is the average of all the peels.

Cheers,