我试图在R中的特定列周围创建边框.我能够使用kableExtra包(如下所示)
iris <- datasets::iris
iris2 <- do.call(data.frame, aggregate(. ~ Species, iris, function(x) c(mean = mean(x), sd = sd(x))))
res2 <- kable(iris2,"html", col.names = c("Species", "Mean", "SD", "Mean", "SD", "Mean", "SD", "Mean", "SD"), align = c("r","c","c","c","c","c","c","c","c")) %>%
kable_styling(bootstrap_options = c("striped", "hover")) %>%
add_header_above(c(" " = 1, "Sepal Length" = 2, "Sepal Width" = 2, "Petal Length" = 2, "Petal Width" = 2))
print(res2)
res3<- column_spec(res2, c(2,4,6,8), border_left = TRUE, border_right = FALSE)
column_spec(res3, c(3,5,7,9), border_left = FALSE, border_right = …我有以下数据集正在尝试传播。
#create df
df <- structure(list(file_number = c("3098129", "3096451", "3096774",
"3095276", "3095464", "3096846", "3097132", "3096355", "3096951",
"3096328", "3095441", "3096325", "3094412", "3096366", "3096372",
"3096507", "3098510", "3096335", "3096403", "3094343", "3096941",
"3096419", "3094431", "3096495", "3094647", "3094487", "3094947",
"3094398", "3094386", "3094367", "3097480", "3096425", "3095193",
"3095839a", "3097197", "3098453", "3098549", "3098428", "3096427",
"3096895", "3096434", "3094835", "3096312", "3094517", "3094372",
"3096387", "3096480", "3098504", "3096338", "3094615", "3096382",
"3096638", "3096750", "3096418", "3094734", "3098503", "3096311",
"3097197", "3094353", "3098442", "3097111", "3097325", "3096531",
"3096405", "3096301", "3096692", "3096495", "3098406", "3098422",
"3096315", "3096951", "3094491", "3096304", …我见过一些涉及尝试将 pdf 转换为 png 的问题，但没有一个答案显示如何将多页 pdf 的每一页保存为不同的 png 文件。
从 13 页 pdf 示例开始：
# exmaple pdf
example_pdf <- "https://arxiv.org/ftp/arxiv/papers/1312/1312.2789.pdf"
如何将 pdf 的每一页另存为不同的 png 文件？