text(-6.5, 5.2, ‘P-value’, adj = c(0, 0.5), cex = 1.2, font = 2, xpd = TRUE) text(labels_x, labels_y, labels01, adj = c(0, 0.5), cex = 1.2, xpd = TRUE) points(labels_x - 0.5, labels_y, pch = 20, col = c(’#1B9E77’, ‘#88419D’,’#A6D854’, ‘#B3...