- make_afc_graph(table.in, classes, clnb, xlab, ylab, cex.txt = cex.par)
+ if (over) {
+ table.in <- table.in[order(cex.par, decreasing = TRUE),]
+ classes <- classes[order(cex.par, decreasing = TRUE)]
+ cex.par <- cex.par[order(cex.par, decreasing = TRUE)]
+ table.in <- stopoverlap(table.in, cex.par=cex.par, xlim = xminmax, ylim = yminmax)
+ classes <- classes[table.in[,4]]
+ cex.par <- cex.par[table.in[,4]]
+ }
+ make_afc_graph(table.in, classes, clnb, xlab, ylab, cex.txt = cex.par, xminmax = xminmax, yminmax = yminmax)