Bonjour,

Je débute en R donc si ce que que j’écris n'est pas correct, n’hésitez pas à me le dire car c'est toujours bon à prendre.
Les fonctions mtext() et pdf() me pose problème. J'essaye de produire deux graphiques avec un titre principal via mtext() et ça marche quand je suis dans R.
Mais en fonction de la valeur d'un argument export (=1 ou 0), je veux que mon output sorte soit dans un pdf soit dans R.
Le problème est que le titre n’apparaît pas quand il génère le pdf.
Voici le fragment de code incriminé :

Code:
if (export==1) pdf(file = Gfile) 
par(mfrow=c(1,2)) 
boxplot (dataset$col~plotdata$v,ylab = "y" ,  col=plotdata$point, xlab = "x") 
legend(x=0, y=1950, "Santé économique moyenne ou mauvaise", col=2, pch=15, inset = 0, cex=0.5) 
legend(x=0, y=1880, "Bonne santé économique", col=4, pch=15, inset = 0, cex=0.5) 
plot(dataset$dataset.GDP~dataset$dataset, col=plotdata$point, pch=20, abline(lm(dataset$dataset.GDP~plotdata$rich),col=4), xlab="nb", ylab="Produit intérieur brut par habitant par an.") 
legend(x=0, y=39500, "Santé économique moyenne ou mauvaise", col=2, pch=15, inset =0, cex=0.5) 
legend(x=0, y=38800, "Bonne santé économique", col=4, pch=15, inset = 0, cex=0.5) 
mtext("titre principal", side = 5, outer = T, cex = 1.5, adj=-0.05, padj=1.2) 
if (export==1) dev.off()
Si quelqu'un a une idée ...

Merci d'avance