img R scatter smaller colorbar