是否可以在R Shiny中使用多个DT formatStyle功能？

Question

我想知道是否可以在R闪亮中使用多个DT :: formatStyle函数。

我想实现颜色（分别为正数和负数的绿色和红色）以及突出显示列总和的最后一行。

以下是我尝试使用的代码，但是我收到了错误：

const sgx_ec256_private_t sgx_sk =
{
    0xc1, 0xe7, 0x59, 0x90, 0x4e, 0x80, 0xa5, 0x52,
    0x45, 0x25, 0xec, 0x2a, 0xc, 0x98, 0x89, 0x6e,
    0x63, 0x96, 0x4d, 0x5d, 0x58, 0x48, 0x86, 0xf4,
    0x9b, 0x70, 0xad, 0xb5, 0xa2, 0x56, 0xe9, 0x13
};

const sgx_ec256_public_t sgx_pk =
{
    0x82, 0xcb, 0x6f, 0x41, 0x3a, 0xd4, 0xfa, 0x57,
    0x6c, 0xc4, 0x1b, 0x77, 0xf6, 0xd9, 0x51, 0xc1,
    0xbc, 0x17, 0x7a, 0x88, 0xd0, 0x2e, 0x94, 0xd6,
    0x91, 0xa3, 0x1d, 0x75, 0xc, 0xbf, 0xa9, 0xca,
    0x8, 0x6c, 0xf3, 0x78, 0x92, 0xdb, 0x2f, 0x52,
    0x0, 0x44, 0x20, 0xd6, 0xa, 0xd3, 0x58, 0x3,
    0xb2, 0x35, 0xda, 0xe2, 0x1b, 0xdb, 0x2b, 0xd2,
    0xb0, 0xaf, 0x5e, 0x29, 0xc8, 0xb4, 0x93, 0x41
};

Answer 1

是的，?formatStyle以及on the github pages documentation

中甚至有考试

library(dplyr)
library(DT)

datatable(mtcars) %>%
  formatStyle("am", color = styleEqual(1, "red")) %>%
  formatStyle("cyl", color = styleInterval(7, c("green", "blue")))

如果您可以提供testdata和完整的最小工作示例，那么帮助会更容易。