R：可格式化 - 列不会根据条件更新

Question

我运行此代码生成格式化的 table 我没有收到任何错误，但我设置的条件似乎根本不起作用。我看起来对吗？我想要做的是 'mAge' 列，如果该行中的值 > 45.63，则颜色应为红色。如果不是那种颜色，则没有变化。

formattable(data.4)
formattable(data.4, align = c("l", rep("r", NCOL(data.4) - 1)))
formattable(data.4,list(`ICD10Code` = formatter(
"span", style = ~ style(color = "black",font.weight = "bold"))),`mAge` = formatter(
"span", style = ~ ifelse("mAge" > 45.63, style(color = "red", font.weight = "bold"), NA)))

数据样本：

ICD10Code mAge Frequency
         50.6         5
  A084   35.0         1
  A609   31.0         1
  A749   38.0         1
  B001   37.0         1
  B079   47.0         1

显然，我有一些问题，但我不确定是什么，因为我没有收到任何错误。

Answer 1

我认为是括号放置（并从 ifelse 中的 mAge 中删除引号）：

library(formattable)

formattable(data.4)
formattable(data.4, align = c("l", rep("r", NCOL(data.4) - 1)))
formattable(data.4,list(
  `ICD10Code` = formatter(
    "span", style = ~ style(color = "black", font.weight = "bold")),
  `mAge` = formatter(
    "span", style = ~ ifelse(mAge > 45.63, style(color = "red", font.weight = "bold"), NA))))

R：可格式化 - 列不会根据条件更新

R: Formattable -Column Will Not Update Based Upon Condition

if-statement

r

formattable