Переместить название участков в список участков в R - PullRequest
0 голосов
/ 06 сентября 2018

У меня есть список графиков, которым я присвоил имена, а затем преобразовал их в заголовки графиков в соответствии с предложением https://stackoverflow.com/a/14790376/9335733. Названия появляются поверх заголовка верхней оси x, поэтому я пытаюсь переместить их как здесь предлагается: https://stackoverflow.com/a/44618277/9335733. Общий код выглядит следующим образом:

lapply(names(Cast.files), function (x) plot(Cast.files[[x]],
                                        main = x,
                                        adj = 0, #adjust title to the farthest left
                                        line =2.5 #adjust title up 2.5
                                        )
   )

Следует отметить, что plot теперь преобразуется из базы R в пакет oce для анализа океанографических данных, но вызывает те же аргументы из базы R plot.

Проблема заключается в том, что при попытке перемещения заголовка метки осей также перемещаются и перекрываются. Есть предложения?

Редактировать: Вот как выглядит изображение раньше: enter image description here

и после: enter image description here

Ответы [ 3 ]

0 голосов
/ 08 сентября 2018

Возможно, вы также захотите взглянуть на аргумент oma= в par(), который предоставляет «внешнее» поле, которое можно использовать для установки хорошего заголовка. Что-то вроде:

library(oce)
data(ctd)
par(oma=c(0, 0, 1, 0))
plot(ctd)
title('Title', outer=TRUE)
0 голосов
/ 08 сентября 2018

Если вы используете функцию заголовка, а не устанавливаете main на графике, это позволит вам изменить линию, не затрагивая ничего на графике.

0 голосов
/ 06 сентября 2018

Это было решено добавлением аргумента title вне функции plot следующим образом:

lapply(names(Cast.files), function (x) plot(Cast.files[[x]], 
                                        which = c("temperature", "salinity", "sigmaT","conductivity"),
                                        Tlim = c(11,12), 
                                        Slim = c(29,32),
                                        col = "red") 
+ title(main = x, adj = 0.48, line = 3.5)#adding the titles at a specific location
   )

Это позволило для участков, которые выглядели так:

enter image description here

...