R Studio中的图例符号和文本间距问题

Question

我正在使用下面给出的代码

问题在于，图例行和图例文本之间的空间非常长，如图所示。 请帮助我如何减少这个间距。 例如图例编号和行之间的间距

________          1

--------          2

legend(x=q-70, y=m, bty = "n", 
  legend = c("1","2","3", "4","5", "6","7", "8","9", "10","11", "12","13", "14","15", "16","17", "18","19", "20"), 
  lty = c(1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,4,4,4,4), 
  col = c("black", "red","green","blue","cyan","magenta","yellow","gray","black", "red","green","blue","cyan","magenta","yellow","gray","black", "red","green","blue"),  
  y.intersp=0.7, cex = 0.95,seg.len = 1.3, lwd = 2)

Answer 1

我注意到您已明确设置y.intersp=0.7 。 我想知道您是否还以某种方式设置了x.intersp 。 无论如何，如果没有其他适合您的方法，则可以尝试各种x.intersp值，直到获得所需的职位。 这是空白背景上的一个简单示例，显示x.intersp如何调整位置。

par(mfrow=c(1,2))
plot(0:2, pch="", xlab="", ylab="", bty="n", xaxt="n", yaxt="n", 
    main="x.intersp=1")
legend(x=1, y=2, bty = "n", 
  legend = c("1","2","3", "4","5","6","7","8","9","10",
    "11","12","13","14","15","16","17","18","19","20"), 
  lty = c(1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,4,4,4,4), 
  col = c("black", "red","green","blue","cyan","magenta","yellow",
    "gray","black", "red","green","blue","cyan","magenta","yellow",
    "gray","black", "red","green","blue"),  
    x.intersp=1, y.intersp=0.7,  cex = 0.95,seg.len = 1.3, lwd = 2)

plot(0:2, pch="", xlab="", ylab="", bty="n", xaxt="n", yaxt="n", 
    main="x.intersp=4")
legend(x=1, y=2, bty = "n", 
  legend = c("1","2","3", "4","5","6","7","8","9","10",
    "11","12","13","14","15","16","17","18","19","20"), 
  lty = c(1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,4,4,4,4), 
  col = c("black", "red","green","blue","cyan","magenta","yellow",
    "gray","black", "red","green","blue","cyan","magenta","yellow",
    "gray","black", "red","green","blue"),  
    x.intersp=4, y.intersp=0.7,  cex = 0.95,seg.len = 1.3, lwd = 2)