2015-09-28 57 views
3

格式行目前我有這樣的:閃亮數據表:這取決於兩個條件

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爲綠色。然而,我只希望格式化爲紅色的單元格,它們各自的日期比10天更「年輕」。

例如,如果此單元格中的值爲< 0且列3中的日期小於10天,則列200dMA(即第2列)應僅爲紅色。如果值大於0並且第3列中的日期小於10天,它應該是綠色的。

我該如何做到這一點?

回答

3

您可以添加一個額外的列checkSignalDataFrame,該列檢查列200d MA50v200d MA。比使用它在formatStyle和隱藏它visible

+0

但是,您可以顯示formatStyle命令格式列'50v200d MA'根據新列檢查的值嗎? – MichiZH

+0

本文檔顯示如何執行此操作:http://rstudio.github.io/DT/010-style.html – user5029763