Smaller colorbar in R