使用multhist和图例保存png

Question

以下代码在不保存png（无dev.off（）或png（））时有效，但否则会产生以下两个错误之一：

require(plotrix)
approaches = c("X", "Y", "Z")
lifespans <- list(c(1,2,3,4), c(3,4,5,6), c(1,6,4,1,1,3))
color.names <- c("grey24", "dark grey", "grey90")
png("lifespans_multhist.png")
multhist(lifespans, xlab="Lifespan / seconds", ylab="Frequency")
#legend("topright", approaches, fill=color.names)
dev.off()

我无法理解错误。有时一个发生，有时一个通过运行代码而不进行任何更改。错误：

Error in strwidth(legend, units = "user", cex = cex, font = text.font) : 
  plot.new has not been called yet

Error in is.matrix(height) && beside : invalid 'y' type in 'x && y'

RStudio有时会显示图表，而不会显示其他图表。该程序从未输出所需的png。我已经尝试过对传奇一代和其他变种的定位，但没有成功。我完全不知所措。

编辑：更新了最小工作示例的代码。