如何在 R 中等待按键？

有时候我们需要让 R 程序在等待用户按下某个键之后才能继续执行。这可能是因为我们希望让用户输入数据，或者希望用户在程序执行过程中作出一些决策。本文将介绍如何在 R 中等待按键，并提供一些实际使用的例子。

1. 使用 readline 函数

在 R 中，可以使用 readline 函数等待用户输入。该函数会在命令行界面中显示一个提示符，等待用户输入一些文本，并按下回车键。当用户按下回车键时，readline 函数会将用户输入的文本作为字符串返回。

下面是一个简单的例子。该程序会等待用户输入自己的名字，并将其打印到屏幕上。

name <- readline("请输入你的名字：")
cat("你好，", name, "！")

在运行该程序时，命令行界面将会显示以下内容：

请输入你的名字：

当用户输入自己的名字并按下回车键时，程序会继续执行。例如，如果用户输入 Alice，则程序会输出：

你好， Alice ！

2. 使用 system 函数

另一种等待用户按键的方法是使用 system 函数。该函数可以用于执行操作系统命令，包括等待用户按键。

首先，我们需要使用 system 函数来执行一个操作系统命令，该命令会让程序等待用户按下任意键：

system("read -n 1 -s -r -p '按下任意键以继续...' && echo ''")

该命令会在命令行界面中显示一个提示符，等待用户按下任意键，并按下回车键。当用户按下任意键时，该命令会结束，并返回一个空字符串。

我们可以将上面的命令封装成一个函数，以方便使用：

waitForAnyKey <- function() {
  system("read -n 1 -s -r -p '按下任意键以继续...' && echo ''")
}

现在我们可以在程序中调用 waitForAnyKey 函数以等待用户按键了。例如：

cat("程序执行到这里了！请按下任意键以继续...")
waitForAnyKey()
cat("好的，你按下了任意键，程序继续执行了！")

当程序执行到 waitForAnyKey() 时，命令行界面将显示以下内容：

程序执行到这里了！请按下任意键以继续...

当用户按下任意键并按下回车键时，程序会继续执行。例如，如果用户按下 a 键，程序会输出：

好的，你按下了任意键，程序继续执行了！

3. 注意事项

在使用上述方法等待用户按键时，有一些需要注意的事项：

• readline 和 system 函数只能在交互式命令行下工作，而不能在脚本中使用。如果你使用的是 R Studio 等集成开发环境（IDE），则可以在控制台中使用这些函数。
• readline 函数通常用于等待用户输入文本，而 system 函数则用于等待任意键。根据具体的需求选择使用哪个函数。
• system 函数的实现方式可能因操作系统而异，在某些操作系统下可能需要额外的配置或不支持，请注意测试。