slopeSuit(23.4,"carrot")
library(sp)
library(raster);library(terra)
slope=rast(suitabinput["slope"])
slope$tea=slopeSuit(slope$slope,"tea")
slope$carrot=slopeSuit(slope$slope,"carrot")
summary(slope$carrot)
spplot(slope$carrot)
Run the code above in your browser using DataLab