오른쪽에있는 textInputAddon에 addon을 R 반짝이에 넣을 수 있습니까?

Question

반짝이는 R의 텍스트 입력에 아이콘을 표시하려고했습니다. iconInputAddon을 사용하여 아이콘을 추가했지만 기본적으로 왼쪽에 배치됩니다.

textInputAddon("tia1",label = NULL,value = "99", addon = icon("percent")) 

오른쪽에 넣을 방법이 있습니까? 사전에

감사 HTML을 사용하는 것입니다 할

Answer 1

한 가지 방법을 아래와 같이

는 희망 :

library(shiny) 
    library(shinyWidgets) 

    ui <- fluidPage(

    # textInputAddon("tia1",label = NULL,value = "99", addon = icon("percent")) 
    tags$head(HTML('<link href="shared/font-awesome/css/font-awesome.min.css" rel="stylesheet">')), 
    HTML('<div class="form-group shiny-input-container"> 
     <div style="margin-bottom: 5px;" class="input-group"> 
     <input id="tia1" type="text" class="form-control shiny-bound-input" value="99"> 
     <span class="input-group-addon"> 
     <i class="fa fa-percent"> 

     </i> 
     </span> 
     </div> 
     </div>') 
) 

    server <- function(input, output){} 


    shinyApp(ui = ui, server = server) 

다음과 같이 textInputAddon를 얻을이 코드를 사용하여 도와 줘요!