在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能做到吗？

- ECII

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")
}

- Thomas