Légendes chevauchant les tracés dans Rstudio

Question

J'essaie de tracer une image, puis de superposer une légende à son sommet. La légende couvre l'intrigue et je ne suis pas en mesure de l'ajuster en utilisant différents paramètres comme cex, lty, etc.

plot(cov16_2ms04h$unqC_Sp, cov16_2ms04h$unqC_My, log="xy", 
col=(cov16_2ms04h$binom_q<0.001)+1, 
ylab="Haplotype B Count", xlab="Haplotype A Count") 
abline(0,1,col="grey") 
legend("topleft",c("No significant imbalance","Significant imbalance"),pch=c(10,10),col=c(1,2), cex = 0.5) 

me donne terrain comme:

Mais, je veux quelque chose comme:

Merci,

Answer 1

ont vous avez essayé d'agrandir la taille de l'intrigue avant de recouvrir une légende? Je t'ai essayé le code de légende, la légende était parfaite sur l'intrigue.

Answer 2

Le problème est avec R-studio car la taille du tracé de sortie est déterminée par la taille costumée du volet.

Pour tracer les résultats directement dans un fichier pdf ou png, vous pouvez effectuer les opérations suivantes.

# plotting directly on pdf or png - select the required one 
pdf("my_plot.pdf", height=6, width=6) 
png("my_plot.png", width = 4, height = 4, 
    units = 'in', res = 300) 

plot(cov16_2ms04h$unqC_Sp, cov16_2ms04h$unqC_My, log="xy", 
    col=(cov16_2ms04h$binom_q<0.001)+1, 
    ylab="Haplotype B Count", xlab="Haplotype A Count") 

abline(0,1,col="grey") # draw abline 

legend("topleft",c("No significant imbalance","Significant imbalance"), 
    pch=c(1,1),col=c(1,2), cex = 0.75) # add legend 

dev.off() # close the plot 

La sortie est alors comme:

Merci,