我想绘制一堆栅格,我创建了一个代码来调整每个栅格的中断并通过for循环绘制它们.但是我得到了一个有问题的色标栏,而我的努力并没有有效解决这个问题.例:
我的降水范围从0到11.000 ......但是大部分数据都在0到5.000之间......而非常少到11.000之间.因此,我需要更改中断以捕获此变化...更多中断我有更多数据.
然后我为此创建了一个休息对象.
但是当我绘制光栅时,刻度颜色条变得糟糕,非常混乱......
#get predictors (These are a way lighter version of mine)
predictors_full<-getData('worldclim', var='bio', res=10)
predic_legends<-c(
"Annual Mean Temperature [°C*10]",
"Mean Diurnal Range [°C]",
"Isothermality",
"Temperature Seasonality [standard deviation]",
"Max Temperature of Warmest Month [°C*10]",
"Min Temperature of Coldest Month [°C*10]",
"Temperature Annual Range [°C*10]",
"Mean Temperature of Wettest Quarter [°C*10]",
"Mean Temperature of Driest Quarter [°C*10]",
"Mean Temperature of Warmest Quarter [°C*10]",
"Mean Temperature of Coldest Quarter [°C*10]",
"Annual Precipitation [mm/year]",
"Precipitation of Wettest Month [mm/month]", …Run Code Online (Sandbox Code Playgroud)