删除使用r中的定位器插入到绘图中的文本框

如何删除使用定位器插入的最后一项（如文本框）？i、 e

plot(1:3)
text(locator(1),labels="oops wrong spot...remove me",cex=1,font=1)

---

您可以非常轻松地实现一些可以让您做到这一点的功能：

locator <- function(...) {
    assign('.last.plot', recordPlot(), envir=.GlobalEnv)
    graphics::locator(...)
}

undo <- function()
   if (exists('.last.plot')) replayPlot(.last.plot)

plot(1:3)
text(locator(1),labels="oops wrong spot...remove me",cex=1,font=1)
undo()

---

定位器我想你做不到。使用R绘制东西的一般模式是，一旦设备上出现某个东西，它就会一直存在，直到您擦除整个设备或覆盖它。如果您的工作流非常依赖于手动注释图形，您可以使用白色文本（或背景色，如果它不透明）在其上进行书写，您最好切换工具，使用图像编辑器对其进行后期处理。像Inkscape或Photoshop这样的软件在修复错误时会有更多的余地。没错，但我发现在运行辅助程序时图像质量会降低……如果您使用的是正确的（通常是矢量）图形格式等，则在运行辅助程序时图像质量不应该降低。，但不可否认，这可能有点棘手/依赖于平台。太好了！这是非常有帮助的，因为现在我不必对我的情节玩“没有犯错的余地”的游戏。谢谢