Rstudio图例覆盖图片

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

相信许多小白都有这样的经历，明明按照教科书上的图形代码在Rstudio上写好了，可是做出来的图例legend各种问题，不是太大就是干脆覆盖整个图形，让人抓狂。“命令写的很完整，运行没有报错，可图例藏哪去了？”“图画的很美，怎么总是图例不协调？”“啊~~啊，抓狂，图例盖住关键的点了。”“怎么才能让图例指哪站哪？” “图例太长怎么办”……

我想到的办法就是，去R运行。

以下是同一段代码在R，以及Rstudio运行出来的结果

dose <- c(20, 30, 40, 45, 60) drugA <- c(16, 20, 27, 40, 60) drugB <- c(15, 18, 25, 31, 40) opar <- par(no.readonly = TRUE) par(lwd = 2, cex = 1.5, font.lab = 2) plot(dose, drugA, type = "b", pch = 15, lty = 1, col = "red",     ylim = c(0, 60), main = "Drug A vs. Drug B", xlab = "Drug Dosage",     ylab = "Drug Response") lines(dose, drugB, type = "b", pch = 17, lty = 2,     col = "blue") abline(h = c(30), lwd = 1.5, lty = 2, col = "grey") library(Hmisc) minor.tick(nx = 3, ny = 3, tick.ratio = 0.5) legend("topleft", inset = 0.05, title = "Drug Type",     c("A", "B"), lty = c(1, 2), pch = c(15, 17), col = c("red",         "blue")) par(opar) Rstudio运行结果 R运行结果 这下终于正常了。 希望有大佬能够解答以下问题，并提供解决方法，不胜感激！！！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：RStudio Studio stu dio Legend

已找到解决办法，在14年的一个帖子上找到的，帖子地址找不到了。
只要在Rstudio里输出图片就没问题了，这里以tiff为例，（其他格式也可以）
setwd("D:/STUDY/Rmarkdown")  # 设置工作目录
tiff(file="mygrapg.tiff")  # 这一步非常重要！！！
dose <- c(20, 30, 40, 45, 60)
drugA <- c(16, 20, 27, 40, 60)
drugB <- c(15, 18, 25, 31, 40)
opar <- par(no.readonly = TRUE)
par(lwd = 2, cex = 1.5, font.lab = 2)
plot(dose, drugA, type = "b", pch = 15, lty = 1, col = "red",
     ylim = c(0, 60), main = "Drug A vs. Drug B", xlab = "Drug Dosage", ylab = "Drug Response")
lines(dose, drugB, type = "b", pch = 17, lty = 2,
      col = "blue")
abline(h = c(30), lwd = 1.5, lty = 2, col = "grey")
library(Hmisc)
minor.tick(nx = 3, ny = 3, tick.ratio = 0.5)
legend("topleft", inset = 0.05, title = "Drug Type", c("A", "B"), lty = c(1, 2), pch = c(15, 17), col = c("red",  "blue"))
par(opar)
dev.off()