Question

我正在使用ggplot在R中制作堆积条形图。一切都运行良好，我将标题分配给情节，但我尝试的任何东西都不会让它居中。我的代码目前是（改变了一些标签）：

pddis$row <- seq_len(nrow(pddis))
pddis2 <- melt(pddis, id.vars = "row")

ggplot(pddis2, aes(x=variable, y=value, fill=row)) + 
geom_bar(stat="identity", position="fill") +
xlab("\nDis") +
ylab("Percentage\n")+
ggtitle("Distribution of PD responses)+
guides(fill=guide_legend(title="PD"))+
scale_y_continuous(labels = scales::percent)+
scale_fill_continuous(labels = c("0", "1", "2", "3", "4"))+
theme(plot.title=element_text(hjust=0.5))+
theme_classic()

我还将ggtitle更改为opts和labs(title=)，并以各种方式使用adj=0.5，但这些都不起作用。如果这是显而易见的道歉，但我无法弄清楚我做错了什么。代码仍然运行并使用这些其他参数生成图（但不是opts，但标题不是中心对齐的。

Answer 1

theme_classic会覆盖您的代码。尝试添加

theme(plot.title = element_text(hjust=0.5))

theme_classic命令之后。例如，

ggplot(mtcars,aes(wt,mpg)) + geom_point() + 
labs(title = 'xyz') + 
theme_classic() +
theme(plot.title = element_text(hjust=0.5))

为什么我不能在ggplot中调整我的标题？

1 个答案: