从R中第一次击键开始的用户输入时间

我最近使用两个包的组合解决了这个问题- tictoc 和 keypress .

从…起 按键 您可以使用 keypress() 函数,等待用户输入,然后输出按下的键- 按键() 仅适用于命令行上的R,它支持大多数键,但不支持所有键。

通过按键,你可以编写一个简单的 if 声明调用 tic() 函数来自 tictoc公司 .

实例

当我发布这个问题时,我想知道在按下“a”键后,一个人键入整个小写字母需要多长时间。

require(tictoc)
require(keypress)

for(i in 1:26){

  a=keypress()

  if(a==letters[1])  tic()
  if(a==letters[26]) toc()

  cat(paste(a))
}

abcdefghijklmnopqrstuvwxyz6.649 sec elapsed

当按下“a”时,秒表启动,然后在按下“z”键时停止。