闪亮的数据表:根据两个条件格式化行

时间:2015-09-28 13:18:41

标签: r datatables shiny

目前我有这个:

datatable(SignalDataFrame,selection = 'single', options=list(dom='ft')) %>%
    #datatable(ResultDF, options=list(dom='ft')) %>%
      formatStyle(
        '200d MA',
        backgroundColor = styleInterval(0, c('#e6b8b7', '#d8e4bc'))
      ) %>%
      formatStyle(
        '50v200d MA',
        backgroundColor = styleInterval(0, c('#e6b8b7', '#d8e4bc'))
      ) %>%
      formatDate(c(3,5,6), "toLocaleDateString")
    })

如您所见,样式间隔仅格式化值<0(红色)和值> 0(绿色)。然而,我只希望格式化为红色的单元格,各自为绿色,其各自的日期为“#34;更小&#34;超过10天。

例如,如果此单元格中的值<0且第3列中的日期小于10天,则列200dMA(作为第2列)应仅为红色。如果值> 0且第3列中的日期小于10天,则应为绿色。

我怎样才能做到这一点?

1 个答案:

答案 0 :(得分:3)

您可以向check添加额外的列SignalDataFrame,以检查列200d MA50v200d MA。比,在formatStyle使用它,并用visible隐藏它。