在R中的地块列表中移动地块标题

Question

我有一个分配了名称的地块列表，然后按照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 。

问题在于，在尝试移动标题时，轴标签也会移动并重叠。 有什么建议么？

编辑：这是图像之前的样子：

之后：

Answer 1

您可能还想研究par()的oma=参数，该par()提供了“外部”边距，可用于放置漂亮的标题。 就像是：

library(oce)
data(ctd)
par(oma=c(0, 0, 1, 0))
plot(ctd)
title('Title', outer=TRUE)

Answer 2

这是通过在plot函数之外添加title参数来解决的，如下所示：

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
   )

这允许如下图所示：

Answer 3

如果您使用标题功能，而不是在绘图中设置main，则可以在不影响绘图中任何其他内容的情况下更改行。