我有 28个地块的空平台:
par(mfcol = c(7, 4), mar = rep(.1, 4), oma = rep(7, 4))
invisible(lapply(1:28, plot, t = "n", xaxt = "n", yaxt = "n"))
我试图添加一些标签。 标签的位置如下图所示(面板中间(蓝点)和面板间隙(箭头)之间。
使用" grconvertX
"和" grconvertY
",我想知道如何找到我在下面的图片中显示的所有点的位置?
对于沿 x轴和 y轴的中间位置( 蓝点 ),以下工作完美:
(at <- seq(grconvertX(0 + (1 / 8), "nic"), grconvertX(1 - (1 / 8), "nic"), l = 4))
(at <- seq(grconvertY(0 + (1 / 14), "nic"), grconvertY(1 - (1 / 14), "nic"), l = 7))
但是对于面板间隙之间的位置( 箭头 ),我需要帮助吗?