定義自定義標簽

Question

我對閃亮的功能tag有些困惑。 例如，如果要定義自定義標簽； 例如，我想定義一個FONT標簽，那么我會做類似的事情

shiny::tag("FONT", varArgs = list("size=2", "color"))

現在，我將如何使用定義的標簽。 例如，使用預定義標簽，我可以做類似的事情

library(shiny)
tags$p("This is my paragraphs")

我正在尋找在包裝中使用它們的方法。

更新2016-10-14

Geovany提供的以下功能（稍作修改）應該可以使用

myFont <- function(cont = "", size = 2, color = "#000000") {
  shiny::tag("FONT", varArgs = list(size = size, color = color, cont))
}

myFont("This is my test")

Answer 1

shiny::tag函數創建HTML標記，然后在參數中對其進行定義。 如文檔中所示：

命名列表項成為屬性，未命名列表項成為子級。

您可以創建一個函數來簡化您的工作：

myFont <- function(size = 2, color = "#000000") {
  shiny::tag("FONT", varArgs = list(size = size, color = color))
}

該函數將返回如下內容： <FONT size="2" color="#000000"></FONT>

這是另一個示例，它執行的操作與tags$p非常相似，但是還定義了一個類。

myP <- function(cont = "", class = "abc") {
  shiny::tag("p", varArgs = list(class = class, cont))  
}

將函數調用為： myP("hello")將返回： <p class="abc">hello</p>

希望對您有所幫助。

更新功能以滿足要求

myFont <- function(cont = "", size = 2, color = "#000000") {
  shiny::tag("FONT", varArgs = list(cont, size = size, color = color))
}