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

Question

是否可以使用R？`

进行交互式和图形用户数据输入

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

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

然后使用图形用户提供的y向量进行一些计算。

这可能与R或我应该转向JavaScript吗？ Can 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")
}