R ggplot2 ось название проблема

Question

Я относительно новичок в ggplot. При попытке настроить параметры темы для заголовков осей я столкнулся с некоторыми проблемами. В частности, я хочу изменить семейство шрифтов, полужирный текст и слегка сдвинуть заголовок оси x. Я пробовал следующий код: я не получаю ошибку, но ничего в графике не меняется. Любые идеи, что я делаю неправильно? Моя самая большая проблема заключается в том, чтобы переместить название с помощью vjust, прямо сейчас это слишком близко к ярлыкам меток для того, что мне нужно. Благодаря!

ggplot(Car_data, aes(x=Yearyear, y= Total_cars)) + 
geom_line(aes(group=1), colour="#56B4E9", size = 1.5) + 
geom_errorbar(aes(ymin= (Mean_Total_Cars - SE_Total_Cars), ymax= (Mean_Total_Cars + SE_Total_Cars)), width=.2, colour= "black") + 
geom_point(stat = "identity", colour="gray40", size=5, shape= 18) + geom_point(stat = "identity", colour="#56B4E9", size=3, shape= 18) + 
theme(axis.title.x = element_text(color = "black", size = 9, family = "Arial", face = "bold", vjust= 1)) + 
theme(axis.title.y = element_text(color = "black", size = 9, family = "Arial", face = "bold")) + 
theme(axis.text.x = element_text(color = "black", size = 9, family = "Arial", face = "bold")) + 
theme(axis.text.y = element_text(color = "black", size = 9, family = "Arial", face = "bold")) + 
ylab("Mean # Cars") + 
xlab("Year") 

Answer 1

Вы можете установить vjust как отрицательный. Вы можете изменить plot.margin или panel.margin для обеспечения достаточного пространства

например, без каких-либо chages

ggplot(mtcars, aes(x=mpg,y=am)) + geom_point() 

и с vjust = -1 и plot.margin несколько увеличилась на нижнем краю

ggplot(mtcars, aes(x=mpg,y=am)) + geom_point() + 
    theme(axis.title.x = element_text(size=14, face = 'bold', vjust = -1), 
     plot.margin = unit(c(1,1,1,0.5), 'lines'))