J'aimerais créer des légendes sur 3 colonnes.
Mais en exportant mon graphique, les légendes se chevauchent. Et ce peu importe le format d'exportation choisi.
J'ai changé la taille de mes légendes, la taille des points, le nombre de colonnes... Rien n'y fait.
Code : Tout sélectionner
beta <- seq (0, 3 , 0.2)
y = seq(0,15,1)
# Graphique
par(mar=c(25,4, 4, 1) + 0.1, xpd=NA) # creer marge bas, gauche, haut, droite defaut c(5, 4, 4, 1) + 0.1
plot (beta,y)
# Legende
legend ( x=0, y =-25, pch = c(22, 23,24,25,21,22, 23,24,25,21,22, 23,24,25,21,22, 23,24), lty = c( 1,1,1,1, 1, 1,1,1 ,1,1, 1,1,1,1,1,1,1,1), pt.bg = c ("#C71585","#25FDE9","#FFEFD5","#3A9D23", "#ED0000", "#791CF8" ,"#130E0A","#01D758","#0000FF", "#BABABA","#EDFF0C", "#CC5500", "#947F60", "#B666D2", "#1D4851", "#6E0B14", "#D58490","#9683EC" ), c ( 'CH score', 'glPO', 'glPH','Adapted logrank', 'Improved logrank', expression('WLR SZZ'*rho*'=0' *gamma*'=0'), expression('WLR SZZ'*rho*'=0' *gamma*'=1'),expression('WLR SZZ'*rho*'=1' *gamma*'=0'), expression('WLR SZZ'*rho*'=1' *gamma*'=1'),expression('WLR OG'*rho*'=0' *gamma*'=1'), expression('WLR OG'*rho*'=1' *gamma*'=1'), 'FH score', expression('HWLR '*rho*'=0' *gamma*'=0'),expression('HWLR '*rho*'=0' *gamma*'=1'),expression('HWLR '*rho*'=1' *gamma*'=0'),expression('HWLR '*rho*'=1' *gamma*'=1'),'plAH', 'Midpoint imputation'),ncol = 3, pt.cex = 2.5, cex=2, xpd=NA)
PS : Ici , le graphique ne sert à rien, j'aimerais récupérer mes légendes seules pour les placer dans un texte. Je rognerai l'image après exportation en ne gardant que les légendes.
Merci pour toute votre aide ! ça fait des heures que je suis sur le problème...