Hi,
I'd like to ask for help with the long title. What would you suggest to address it?
ggplot(data = sf) +
geom_sf(aes(fill = value), colour = "grey10",size=0.2)+
scale_fill_gradientn(colours= rev(palette),labels= function(x) paste0(format(round(x, 0), nsmall = 0), ""))+
labs(title = "Počet neuspokojených žádostí o pečovatelskou službu a osobní asistenci na 1000 obyvatel 65+ 2018",
fill = "") +
theme(legend.text.align = 1,
legend.title.align = 0.5,
legend.text=element_text(size=7),
plot.title = element_text(hjust = .1,vjust=0.2,size=15),
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
panel.background = element_blank(),
axis.text.x=element_blank(),
axis.text.y=element_blank(),
axis.ticks=element_blank(),
axis.title.x=element_blank(),
axis.title.y=element_blank())+
geom_sf_text(aes(label =nazev),size=3,family="sans")+
annotate("text",x = 14.5, y = 49.8, label = "Středočeský",size=3)+
annotate("text",x = 17.3, y = 49.6, label = "Olomoucký",size=3)+
annotate("text",x = 16.7, y = 49.0, label = "Jihomoravský",size=3)+
ggsave(filename="kraje_neuspesne_zadosti_sluzba.png",dpi="print")
Than you!