Overlap labels in a heatmap legend-How to move legend labels in ggplot in R?

I want to not overlap the labels with the color legend as in the attachment: legend example Here is the code.

p + guides(fill = guide_colorbar(title = "value(ha.)", label.position = "bottom", title.position = "left", title.vjust = 1, frame.colour = "black", barwidth = 18, barheight = 1))