改变颜色而不是灰度变化的
到自定义颜色改变颜色而不是灰度变化的
例如这样的:
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')
)
)
为我们提供了以下内容:
我想要的是改变复制和打印按钮的颜色。
我已经通过https://datatables.net/extensions/buttons/examples/ 但我无法找到解决方案。
可以包括一些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')
)
)
非常感谢。只是作为一个侧面的问题,所以我更好地理解这个回调逻辑,我将如何去实现这个:http://www.w3schools.com/css/tryit.asp?filename=trycss_buttons_animate1 –
你是否使用闪亮或降价文档?如果是这种情况,可能更容易将所有CSS包含在样式表中的链接中。 – NicE
在Rmarkdown中使用它 –
我没有R中进行编程,但是你可以改变使用CSS规则的按钮的颜色。例如https://jsfiddle.net/jevtw2g4/12/ – CMedina
不幸的是,我在CSS中的知识是有限的。我不知道如何将其翻译成R代码。 –