对于我当前正在从事的项目,我想使用闪亮的R将超链接放置在textInput框内。在R中使用以下脚本时,我的html代码将显示在textInput框内,而不是显示“ Google主页”作为可点击的链接。
test <- a("Google Homepage", href="https://www.google.com/")
runApp(
list(ui = fluidPage(
textInput("test", "test", test)
),
server = function(input, output, session){
})
)
是否可以在textInput框内放置超链接?还是仅作为输出值?
答案 0 :(得分:0)
正如@Stéphanie所说,这是不可能的。 因为您将标签包含为输入元素的值。如果您查看HTML,则会看到:
<input id="test" type="text" class="form-control shiny-bound-input" value="<a href="https://www.google.com/">Google Homepage</a>">
因此,如果您只想要可点击的链接,则不需要textInput
。
只需将a tag
放在fluidPage
中:
test <- a("Google Homepage", href="https://www.google.com/")
runApp(
list(ui = fluidPage(
test
),
server = function(input, output, session){
})
)