R:在 Shiny 的表格输出中将部分单元格加粗

Question

我正在使用 R shiny 应用程序并使用 renderTable 和 tableOutput 创建一个表。是否可以将单元格内容的一部分设为粗体，同时保持其余部分为普通文本。

例如特定单元格中的一个条目可以是:

5.3% ~ 1% ~ 7

我尝试在适当的数字周围硬编码 ** 但它只是输出了星号。

谢谢

Answer 1

您可以使用 <strong></strong>如果您想要一些粗体文本，请在表格中添加 HTML 标记，这是一个示例:

library(shiny)
data<-data.frame(a=c("<strong>a</strong>","b"),val=c(1,2))

runApp(list(
        ui = basicPage(
                tableOutput('mytable')
        ),
        server = function(input, output) {
                output$mytable = renderTable({
                        data
                },sanitize.text.function=function(x){x})
        }
))

您需要更改 sanitize.text.function标识以便解释标签。

作为替代方案，您还可以使用 Datatables呈现您的表格。您还可以使用 <strong>标记，但请确保设置了 escape renderDataTable 中的 false 选项部分。