legend("topleft", inset=.05, title="Drug Type", c("A","B"),lty=c(1, 2), pch=c(15, 17), col=c("red", "blue"),cex=0.3,x.intersp = 0.5)
如上图
试了好多种方法
图例应该出现在图片左上角的一小片区域