使用R.绘制图例传奇问题帮助删除图例框

Question

我正在创建一些水文数据的情节，我对这个传说遇到了麻烦。图例在文本周围有大量空白区域。我尝试过使用par(mar= list)，cex，x.intersp以及其他任何我找不到的运气。我还无法发布图片，但下面有一个链接。这是我用来创建绘图和图例的所有代码。下面的abline()表示数据的平均值，这就是我在图例中添加的内容。我已经在网站上进行了研究，我可以使用mtext()或图例（没有bg或框）和rect()使其工作，但似乎我遗漏了一些东西。我是R的新手，但我过去编写过代码。我使用的是RStudio版本0.99.903和R版本3.2.2。

plot(dataFile$time_s,dataFile$w_cmps, type = "l",col="grey50", 
     xlim = c(0,18.5), ylim = c(-7,7), xlab = "Time (s)", ylab = "w (cm/s)", 
     main = "Vertical Velocity", xaxt="n")

axis(side = 1, at = c(0,2,4,6,8,10,12,14,16,18), 
     labels = c(0,2,4,6,8,10,12,14,16,18))

abline(h = mean_w, col = "black", lty = 3, lwd = 4)

legend("bottomleft","Mean w", lty = 3, col = "red", 
       xjust = 1, cex = 1, bg = "grey75", trace = TRUE, ncol = 1, xpd = NA, 
       seg.len = 1, y.intersp = 0.25, x.intersp = 0.25)