스태킹 아이콘 - 기본 예

Question

저는 R에 익숙하며 현재 Shiny를 사용하여 기본 앱을 제작하려고합니다. 아이콘을 쌓는 방법을 이해하려고합니다. 여기 내 시도 :

library(shiny) 

ui <- fluidPage( 
    h5("Hello there"),           
    br(),              

    actionButton(inputId = "ClickonMe", label = (
    "test stack", 
    icon = icon("commenting","fa-2x", lib = "font-awesome"), 
    icon("ban", "fa-stack-1x", lib = "font-awesome"), 
    span(shiny::icon("fa fa-user-ban")) 
)) 

    mainPanel(verbatimTextOutput("Response_text")) 
) 

server <- function(input,output,session) { } 

shinyApp(ui, server) 

이 자유롭게 아무 소용이 여기에 제안 된 솔루션에서 적응 : https://github.com/rstudio/shinydashboard/issues/110

내가 여기 보였다,하지만 난 너무 그것을 이해할 수있을 정도로 경험이 아니에요 음 : http://fontawesome.io/examples/

나는 금지 아이콘을 다른 아이콘의 맨 위에 놓는 방법을 알아 내고 싶습니다.이 경우에는 "주석 달기"입니다.

내가 올바른 길에 있다면 누군가 나에게 설명해 줄 수 있습니까? 그렇지 않다면, 왜?

마지막 편집 - 원래 코드의 작업 버전 :

library(shiny) 

    ui <- fluidPage( 
     h5("Hello there"),           
     br(),              

    actionButton(inputId = "ClickonMe", label = div(
    tags$span("test stack"), 
    tags$span(class = "fa-stack", 
       icon("ban", 
        "fa-stack-2x", 
        lib = "font-awesome"), 
       shiny::icon("fa fa-commenting",class = "fa-stack-1x"), style = "color:red" 
    ) 
) 
) 

     mainPanel(verbatimTextOutput("Response_text")) 
    ) 

    server <- function(input,output,session) { } 

    shinyApp(ui, server) 

Answer 1

당신이 동작 버튼 만 사용 label 매개 변수에 더 복잡한 HTML을 원하는 아이콘 매개 변수를 무시합니다. 라벨에 아이콘을 넣을 수 있습니다

원하는대로 할 수 있습니까?

actionButton(inputId = "ClickonMe", label = div(
    tags$span("test stack"), 
    tags$span(class = "fa-stack", 
      icon("commenting", 
       "fa-stack-2x", 
       lib = "font-awesome"), 
      shiny::icon("fa fa-user-plus",class = "fa-stack-1x") 
      ) 
) 
),