从库中的内置绘图函数中删除图例

Question

所以我在 R 中使用了一个名为 DVHmetrics 的库.它背后的想法是，您可以从特定文件中获取一些数据，由另一个程序导出，然后读取它并操作其中的数据。这也意味着我在这里使用的不是原始数据。

在这个库中，有一个名为 showDVH 的函数，它获取您读取的文件中的一些数据并绘制它。通过查看库背后的代码，该绘图是通过 ggplot 完成的。但是，当使用执行此绘图的函数时，没有显示/不显示图例的选项。问题是我真的需要删除传说。

那么，当它不是直接在函数本身中实现时，有没有办法做到这一点？

Answer 1

package 函数返回 ggplot 对象的列表，因此我们需要为列表中的每个 ggplot 对象分别说“无图例”，请参见下面的示例:

library(DVHmetrics)
library(ggplot2)

# for one patient
x <- showDVH(dataMZ, patID = "P123", show = FALSE)
x <- x$P123 + theme(legend.position = "none")
# plot
x

# for all patients
x <- showDVH(dataMZ, show = FALSE)
x <- lapply(x, function(i) i + theme(legend.position = "none"))
# plot
x