问题描述
每个人。我在尝试用formattable
包保存Cairo
表时遇到麻烦,有人可以帮我吗?
我通常使用Cairo包来使用抗锯齿功能保存图,这很好用,但是现在我使用formattable
包来自定义表格。
问题是我无法使用Cairo
包保存formattable表,这是到目前为止我所做的事情的一个代表:
library(tidyverse)
library(formattable)
# I create my data
data <- iris %>% group_by(Species) %>% summarise(mean_sepal= mean(Sepal.Length),mean_petal= mean(Petal.Length))
# I create the table
formattable(data,align =c("c","c","c"),list(
`Species` = formatter("span",style = ~ style(color = "grey",font.weight = "bold")),`mean_sepal`= color_tile("#71CA97","#DeF7E9"),`mean_petal`= color_tile("#71CA97","#DeF7E9")
))
# My attempt to save the table
Cairo(600,600,file="plot.png",type="png",bg="white")
formattable(data,"#DeF7E9")
))
dev.off()
但是上面的代码只会保存黑色图像。我也一直在尝试使用PNG
函数和CairoPNG
函数,但没有成功。
所以,我的问题是:是否可以用formattable
包或类似的方法保存Cairo
表?
先谢谢!
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)