Есть ли способ разместить гиперссылку внутри textInput с Shiny R - PullRequest
Новая
       34

Есть ли способ разместить гиперссылку внутри textInput с Shiny R

1 голос
/ 04 июня 2019

Для проекта, над которым я сейчас работаю, я хочу поместить гиперссылку в поле textInput, используя блестящий R. При использовании следующего скрипта в 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){
    })
)

Можно ли разместить гиперссылку внутри поля ввода текста?Или только как выходное значение?

1 Ответ

0 голосов
/ 04 июня 2019

Как упомянул @ Стефани, это невозможно. Потому что вы включаете тег в качестве значения элемента ввода. Если вы посмотрите на HTML, вы увидите: 

<input id="test" type="text" class="form-control shiny-bound-input" value="<a href=&quot;https://www.google.com/&quot;>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){
  })
)
...