Shiny中能否使用readLines(prompt=...)？求更简便实现方案

首先直接给结论：readLines(prompt = ...)完全不适合在Shiny应用中使用。原因很简单：Shiny是客户端-服务器架构的Web应用，readLines会在服务器端阻塞进程等待控制台输入，但你的用户是在浏览器里操作，根本看不到服务器的控制台，自然没法输入，这会直接导致你的应用卡死。

针对你的场景，我给两种更简便、符合Shiny设计逻辑的实现方式：

1. 使用Shiny原生输入控件（最推荐） #

如果能提前预知需要用户输入的时机和内容，直接用Shiny内置的输入组件（比如textInput、numericInput）是最省心的方案，完全不需要额外的JS工具。

适配你现有逻辑的示例代码：

ui <- fluidPage(
  selectInput("xxxxx", "选择参数", choices = c("选项1", "选项2")),
  textInput("user_input", "请输入需要校验的内容："), # 新增用户输入框
  actionButton("run", "执行函数"),
  verbatimTextOutput("result")
)

server <- function(input, output, session) {
  # 加载你的函数文件
  source("path/to/functionName.R")
  source("path/to/anotherFunctionName.R")
  
  observeEvent(input$run, {
    # 直接从输入控件获取用户输入，传给函数
    take_input <- input$user_input
    function_result <- functionName(parameters = input$xxxxx, takeInput = take_input)
    output$result <- renderPrint(function_result)
  })
}

shinyApp(ui, server)

你的anotherFunctionName可以完全保留原有的校验逻辑，只需要接收takeInput参数即可——输入已经通过Shiny的原生输入流传递过来，完全符合函数的调用逻辑。

2. 动态触发输入提示（类似readLines的交互式场景） #

如果你的函数执行过程中需要根据中间结果动态请求用户输入（比如类似readLines的交互式提示），可以用shinyalert包的模态输入框来实现，这能模拟控制台交互式体验，且完全在浏览器端完成。

示例代码：

library(shiny)
library(shinyalert)

ui <- fluidPage(
  useShinyalert(), # 加载shinyalert依赖
  selectInput("xxxxx", "选择参数", choices = c("选项1", "选项2")),
  actionButton("run", "执行函数"),
  verbatimTextOutput("result")
)

server <- function(input, output, session) {
  source("path/to/functionName.R")
  
  observeEvent(input$run, {
    # 触发模态输入框，等待用户输入
    shinyalert(
      title = "请输入校验内容",
      inputType = "text",
      showCancelButton = FALSE,
      callbackR = function(input_value) {
        # 用户输入完成后，调用你的函数
        function_result <- functionName(parameters = input$xxxxx, takeInput = input_value)
        output$result <- renderPrint(function_result)
      }
    )
  })
}

shinyApp(ui, server)

这种方式下，你的functionName和anotherFunctionName依然可以保持原有的校验逻辑，只需要把takeInput参数替换为模态框返回的输入值即可。

对比你当前的实现 #

你现在用shinijs::display("takeInput")的方式，本质是通过JS在客户端获取输入再传给服务器，虽然可行，但相比原生输入控件或shinyalert，需要额外维护JS和R的交互逻辑，复杂度更高。而上面两种方案都是基于Shiny的原生生态，代码更简洁，也更容易维护。

最后再强调一次：不要尝试在Shiny中使用readLines(prompt = ...)，它的设计是用于本地R脚本的控制台交互，和Shiny的Web架构完全不兼容，只会导致应用阻塞甚至崩溃。

内容的提问来源于stack exchange，提问作者gccd