我知道还有其他关于此的帖子,但我已经尝试了他们建议的所有内容,但没有任何效果,我以前没有这个问题,现在突然之间,在运行我之前运行的代码时,我开始遇到这个问题。我认为这与我正在创建的主题有关,但我不明白为什么这之前工作得很好,现在却给了我这个问题。另外,有时会出现问题,有时不会……再次使用相同的代码。超级奇怪!
theme_Publication <- function(base_size = 15, base_family = 'sans') {
(theme_foundation(base_size = base_size, base_family = base_family)
+ theme(plot.title = element_text(size = rel(1.2), face = 'bold', hjust = 0.5),
text = element_text(),
panel.background = element_rect(colour = NA),
plot.background = element_rect(colour = NA),
panel.border = element_rect(colour = NA),
axis.title = element_text(face = 'bold', size = rel(1)),
axis.title.y = element_text(angle=90,vjust =2),
axis.title.x = element_text(vjust = -0.2),
axis.text = element_text(size = rel(0.8)),
axis.line = element_line(colour='black', size = 1.2),
axis.ticks = element_line(),
panel.grid.major = element_blank(), …Run Code Online (Sandbox Code Playgroud)