r - 在多个图中通过 identify() 选择点

Question

我有一个数据框df，它的每一列都被绘制为一个简单的散点图。我想在每个图形中选择一个点identify()并将其存储在一个列表中s- 一个接一个的图形。这是我的方法：

x1 <- c(12:4, 5:8, NA, NA)
x2 <- c(15:8, 9:15)
df <- data.frame(x1, x2)

fun <- function(z){
    y <- na.omit(z)
    x <- seq(1:length(y))
    plot(x,y)
    s <- identify(x, n = 1, plot = F)
}

lapply(df, fun)  

在第一个图中选择一个点后出现以下错误：

> warning: no point within 0.25 inches

但似乎第二个图中的点被正确检测到。我做错了什么？

Answer 1

您需要再向 中添加一个参数identify，以便它知道要查找的 y 坐标。

s <- identify(x = x, y = y, n = 1, plot = F)

更改此设置后，您的功能对我来说效果很好。