ggplotで自分のタイトルを調整することができないのはなぜですか？

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() 

私もoptsとlabs(title=)にggtitleを変更して、様々な方法でadj=0.5を使用しますが、これらの作品のどれもどちらか。これが明らかな場合にはお詫びしますが、私が間違っていることは解決できません。コードはまだ実行され、これらの他の引数（ただしoptsとのプロットを生成するが、タイトルだけで整列センターされていません。

Answer 1

theme_classicはあなたのコードを上書きしている。theme_classicコマンドの後

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

を追加してみてください例えば、

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