Как использовать formattyle (), чтобы изменить цветовую базу вне условия? - PullRequest
Новая
       6

Как использовать formattyle (), чтобы изменить цветовую базу вне условия?

0 голосов
/ 11 марта 2020 
print(data)

Metric   2016   2017    2018      2019  Change Since 2016  
Average  110    104      95        96        -.146          
Median   41     44       42        47         .128

Это мой код, там есть сценарий java, который форматирует линию тренда в другом столбце, который я не перечислил в своих данных. И после выполнения этого он выводит мои данные как таковые 

DTdata <- datatable(data, rownames = FALSE,escape = FALSE, filter = 'none', 
                          options = list(paging = FALSE, 
                                         searching = FALSE,
                                         paging = FALSE,
                                         info = FALSE,
                                         fnDrawCallback = htmlwidgets::JS(
                                           '
function(){
  HTMLWidgets.staticRender();
}
'
                                         )
                          )) %>%
  spk_add_deps() %>%
  formatPercentage('Change Since 2016', digits = 1) %>% 
  formatStyle('Metric', fontWeight = 'bold') %>%
  formatStyle('Change Since 2016', fontWeight = 'bold') 



 DTdata

enter image description here

Моя цель состоит в том, чтобы иметь какую-то логику c, чтобы изменить цвет мои значения в столбце «Изменить с 2016 года», чтобы выделить огромные изменения.

Так что если изменение с 2016 года уменьшается более чем на 10%, я бы хотел, чтобы оно было зеленым (положительным), а если оно увеличится более чем на 10% Я бы хотел, чтобы он был красным (отрицательный). Если между -10 и 10, я бы хотел, чтобы он оставался черным.

Должен ли я использовать случай, когда?

Любая помощь будет принята с благодарностью.

...