html - R中的HTML在粘贴时不呈现

Question

在 R 中呈现 HTML 标签时，我得到以下输出。同一行中的所有标签

方案 1

asd <- HTML("'<table><tr><td><b>COL1</b></td><td><b>COL2</b></td></tr></table>'")
asd
'<table><tr><td><b>COL1</b></td><td><b>COL2</b></td></tr></table>'

但是当我通过粘贴功能在 HTML 中呈现合并标签时，我进入了不同的行。因为，当我在场景 2 中声明后尝试在某些地方传递“asd”时，它不起作用。但是当我在场景 1 中声明后使用“asd”时，它正在工作

方案 2

asd <- HTML(paste0("'",tags$table(tags$tr(tags$td(tags$b("COL1")),tags$td(tags$b("COL2")))),"'"))
asd
'<table>
  <tr>
    <td>
      <b>COL1</b>
    </td>
    <td>
      <b>COL2</b>
    </td>
  </tr>
</table>'

标签： htmlrshiny