Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/82.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 当一个完整的单词被输入到文本输入中时,一个闪亮的应用程序如何识别?_R_Shiny - Fatal编程技术网

R 当一个完整的单词被输入到文本输入中时,一个闪亮的应用程序如何识别?

R 当一个完整的单词被输入到文本输入中时,一个闪亮的应用程序如何识别?,r,shiny,R,Shiny,在中,文本输入可由用户提供。当用户键入时,我希望执行服务器端代码,但仅在键入完整单词后执行。无论何时输入“空格”,我都可以执行吗?我不知道有哪个软件包会真正检查整个单词。正如您所想象的,其他语言可能也需要包含在其中。举一个激活的例子,如果字符串中有空格,您可以执行以下操作:请注意,空格不必在键入内容之后,如果字符串中有空格,则会激活。为了包含更多的测试用例,我建议您使用regexpr,library(stringr),library(stringi)。请看一些例子 rm(list = ls())

在中,文本输入可由用户提供。当用户键入时,我希望执行服务器端代码,但仅在键入完整单词后执行。无论何时输入“空格”,我都可以执行吗?

我不知道有哪个软件包会真正检查整个单词。正如您所想象的,其他语言可能也需要包含在其中。举一个激活的例子,如果字符串中有空格,您可以执行以下操作:请注意,空格不必在键入内容之后,如果字符串中有空格,则会激活。为了包含更多的测试用例,我建议您使用
regexpr
library(stringr)
library(stringi)
。请看一些例子

rm(list = ls())
library(shiny)

ui =(pageWithSidebar(
  headerPanel("Words With Spaces"),
  sidebarPanel(
    textInput("my_text", "Type something (will activate if has space):", "")),
  mainPanel(textOutput("text"))
))

server = function(input, output, session){

  output$text <- renderText({

    if(is.na(is.null(input$my_text)) || is.null(input$my_text)){return()}

    if(regexpr(" ",input$my_text)[1] > 0){input$my_text}
  })  
}
runApp(list(ui = ui, server = server))
rm(list=ls())
图书馆(闪亮)
ui=(页面带有侧栏)(
headerPanel(“带空格的单词”),
侧栏面板(
textInput(“my_text”,“键入内容(如果有空间将激活):”,“”),
主面板(文本输出(“文本”))
))
服务器=功能(输入、输出、会话){
输出$text 0){输入$my_text}
})  
}
runApp(列表(ui=ui,server=server))

我知道这不能直接回答你的问题——因为我不知道答案——但是使用
submitButton()
?它应该在用户打字时“连续”工作。这正是我目前正在寻找的。良好的起点。目前只有英语是可以的。