RShinyアクションボタンに画像を追加する

Question

RShinyアクションボタンに画像を追加するにはどうすればよいですか？ JPEGファイルと同じように...

shinyUI(fluidPage( 
    titlePanel("Image on button"), 

    sidebarLayout(
    sidebarPanel(

    ), 

    # Show a plot of the generated distribution 
    mainPanel(
     actionButton("button","Submit"), 
    ) 
) 
)) 

Answer 1

私の解決策以下

shinyUI(fluidPage( titlePanel("Image on button"), sidebarLayout( sidebarPanel( ),

#Show a plot of the generated distribution mainPanel( actionButton("button","Submit",), tags$button( id = "my_button", class = "btn action_button",
tags$img(src = "http://i0.wp.com/unaracnidounacamiseta.com/wp- content/uploads/2012/07/lorem.jpg",height = "50px") #internet image #tags$img(src = "your_image.png",height = "50px") #local image ),
) ) ) )