改变闪亮的动作按钮的形状

Question

有人知道如何将操作按钮的形状从方形变为闪亮的圆形吗？？

library(shiny)

ui <- fluidPage(
  h1("Some text:"),
  tags$head(tags$script(src = "Welcome.js")),
  tags$button(id="intro", 
              type="button", 
              class="btn action-button btn-success btn-lg ",
              strong(HTML('<i class="icon-star">  </i>Some text')))
)

谢谢

直流

Answer 1

要更改操作按钮的形状，您可以使用 CSS。一种方法是：

.btn {
  display:block;
  height: 300px;
  width: 300px;
  border-radius: 50%;
  border: 1px solid red;
}

，来源：Circle button css。这将创建一个循环操作按钮。

要在闪亮的应用中添加 CSS，您可以使用 tags$head(tags$style(HTML(...))):

可重现的例子：

library(shiny)

ui <- fluidPage(
  tags$head(
    tags$style(HTML("
                  .btn {
                    display:block;
                    height: 60px;
                    width: 60px;
                    border-radius: 50%;
                    border: 1px solid red;

                    }

                    "))
    ),
  actionButton("do", "Go!")
)

server <- function(input, output, session) {
  observeEvent(input$do, {
    print(2)
  })
}

shinyApp(ui, server)