我运行此代码来生成格式化的表,但没有收到任何错误,但我设置的条件似乎根本不起作用。我看起来对不对?我要针对的是“ 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