我的功能是:
create_matrix <- function() {
cat("Write the numbers of vertices: ")
user_input <- readLines("stdin", n=1)
user_input <- as.numeric(user_input)
print(user_input)
}
Run Code Online (Sandbox Code Playgroud)
对于版本3.5.0,在我输入数据后,程序不会继续执行.我直接从控制台调用脚本.