改变颜色而不是灰度变化的

问题描述:

到自定义颜色改变颜色而不是灰度变化的

例如这样的:

library(DT) 
iris2 = head(iris, 20) 
# only show the Copy and Print buttons 
datatable(
    iris2, 
    extensions = 'Buttons', options = list(
    dom = 'Bfrtip', 
    buttons = c('copy', 'print') 
) 
) 

为我们提供了以下内容:

enter image description here

我想要的是改变复制和打印按钮的颜色。

我已经通过https://datatables.net/extensions/buttons/examples/ 但我无法找到解决方案。

+0

我没有R中进行编程,但是你可以改变使用CSS规则的按钮的颜色。例如https://jsfiddle.net/jevtw2g4/12/ – CMedina

+0

不幸的是,我在CSS中的知识是有限的。我不知道如何将其翻译成R代码。 –

可以包括一些JavaScript/jQuery来改变按钮的颜色在回调:

datatable(
     iris2, 
     callback=JS('$("a.buttons-copy").css("background","red"); 
        $("a.buttons-print").css("background","green"); 
        return table;'), 
     extensions = 'Buttons', options = list(
       dom = 'Bfrtip', 
       buttons = c('copy', 'print') 
     ) 
) 
+0

非常感谢。只是作为一个侧面的问题,所以我更好地理解这个回调逻辑,我将如何去实现这个:http://www.w3schools.com/css/tryit.asp?filename=trycss_buttons_animate1 –

+0

你是否使用闪亮或降价文档?如果是这种情况,可能更容易将所有CSS包含在样式表中的链接中。 – NicE

+0

在Rmarkdown中使用它 –