r studio中的图例符号和文本间距问题

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

问题是图例行和图例文本之间有很长的间距，如图所示。请帮助我如何减小间距。例如图例编号和这样的线条之间的间距

________          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)

---

我注意到您已经显式地设置了

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)

---

我无法按原样复制。你能重复这个问题吗？这包括样本数据（小）和生成整个绘图的代码。我不知道如何重现一个好问题，请仅查看图例代码，并查看图片图例中的行距和数字间距，请编辑。我在空白绘图上运行了您的图例代码，在线条和标签之间没有任何大的间隙。关于如何提出好问题的好参考包括：，和。但一般来说，请从我们的角度尝试：从一个新的、空的R会话开始。获取您提供给我们的所有代码并尝试运行它。这很接近，但它不起作用，因为我们没有一个现有的情节开始。如果我以

plot（1）

开头，那么对

legend

的调用会起作用，不会出错（这很好），但不会在此处重现您的问题。我建议你尝试用不同类型的数据重现这个问题；对于一个可重复性很强的问题，最好使用R中包含的著名数据集或其更流行的软件包。