library(shiny)shinyUI(pageWithSIDebar( headerPanel("Code"),sIDebarPanel( ),mainPanel( textoutput("code") ) ))
和server.R文件:
shinyServer(function(input,output) { output$code <- renderText({ HTML('<strong> Hello World <strong>') }) })
我希望输出为:
你好,世界
而不是显示强标记的原始HTML文本输出.
基本上,我想在ui.R中解析HTML文本.我实际上是在尝试做一些比这更复杂的事情,但是一旦我解决了这个简单的问题,我应该没问题.我不能只将HTML标记放在ui.R中,因为我希望它能根据其他一些值进行更改.谢谢!
解决方法 总之,我已经找到了解决方案,感谢StackOverflow的善良灵魂.您只需使用renderUI和uioutput:server.R
shinyServer(function(input,output) { output$code <- renderUI({ HTML('<strong> Hello World <strong>') }) })
ui.R
library(shiny)shinyUI(pageWithSIDebar( headerPanel("Code"),mainPanel( uioutput("code") ) ))
问题解决了.
总结以上是内存溢出为你收集整理的如何从Shiny中的server.R解析为HTML标记全部内容,希望文章能够帮你解决如何从Shiny中的server.R解析为HTML标记所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)