r - R 中的交互式图形数据输入

Question

是否可以使用 R 进行交互式图形用户数据输入？`

我有一个时间向量 t<-1:100我希望用户以图形方式提供 y 的值.

理想情况下，我希望界面以 y<-rep(0, length(t)) 开头做一个plot(t,y, ylim=c(0,50), type="h")我希望用户在每个 t 处绘制 y 的高度.

然后使用用户提供的图形 y矢量做一些计算。

这在 R 中可行吗？还是我应该转向 javascript？ Shiny 能做到吗？

Answer 1

如果您想在 R 中本地执行此操作(无需打开 Shiny 等)，您可以使用 locator 函数，它会在单击图形设备时记录鼠标的位置。它的第一个参数接受一些位置/点击记录。

这是一个简单的例子，它会在每次点击后更新您的绘图:

t <- 1:5
y <- rep(0, length(t))
plot(t,y, ylim=c(0,50), type="h")
for(i in seq_along(t)){
    y[i] <- locator(1)$y
    plot(t,y, ylim=c(0,50), type="h")
}