Легенды на графиках R

Я хочу разбить легенду на графике на 2, чтобы первые 3 элемента были отделены от 4-го элемента промежутком примерно в 1 строку. высота. Сначала я просто попытался добавить разрыв строки перед 1-м элементом:

legend("topright",col=1,lty=1:3,lwd=1,legend=c("leg1","leg2","\nleg3"), bty="n")

, но это, похоже, увеличивает разрыв между всеми элементами (это документированное поведение?)

Затем я использовал 2 отдельных легенды, установив границы на "n" и используя lines () , чтобы восстановить границы (кстати, есть ли способ подавить только 1 границу легенды?); хотя это работает, требуется много проб и ошибок со значениями во вставке .

Значения по умолчанию для вставки в legend () равны c (0,0) , но они, очевидно, корректируются при первоначальном вызове ] legend () , в зависимости от длины текста в элементах этой легенды. Согласно ? Legend , значение вызова legend () включает в себя

"числовые векторы длины length (legend), задающие координаты x и y текста легенды. (s). "

Можно ли как-нибудь преобразовать это значение в подходящие значения для вставки 2-го вызова, чтобы элементы обеих легенд совпадали?