搜索
查看: 1627|回复: 0

16-在shiny用控件获取用户多行文本输入,用换行符切割!

[复制链接]

634

主题

1182

帖子

4030

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
4030
发表于 2017-3-16 11:45:08 | 显示全部楼层 |阅读模式
这个很简单,但是很有用:
[AppleScript] 纯文本查看 复制代码
library(shiny)

ui <-  fluidPage(
    h4("Multi-line text input test"),
    tags$style(type="text/css", "textarea {width:100%}"),
    tags$textarea(id = 'input_text', placeholder = 'Type here', rows = 8, ""),
    verbatimTextOutput("output_text")
  )

server <-   function(input, output){
    output$output_text <- reactive({
     paste( strsplit(input$input_text,'\n')[[1]],collapse = '::::')
    })
  }

shinyApp(ui=ui,server=server)
你这个问题很复杂,需要打赏,请点击 http://www.bio-info-trainee.com/donate 进行打赏,谢谢
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|手机版|小黑屋|生信技能树 ( 粤ICP备15016384号  

GMT+8, 2019-8-22 22:34 , Processed in 0.108164 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.