调整图例行为的图形

Question

library(raster)
library(sp)

 my.shp <- getData('GADM', country = 'FRA', level = 1)
 x <- data.frame(ID_1 = 1:22, variable = c(runif(20, min = 0, max = 2), 25, 88))

 dat.shp <- merge(my.shp, x)

spplot(dat.shp, "variable")

我要使用spplot将所有'variable <= 1'的值绘制为红色阴影，并将所有variable > 1 & variable <= 2' in shade of green and all values of variable> 2`的值绘制为黑色spplot

我也希望我的图例显示以下标签：0、0.2、0.4、0.6、0.8、1、1.2、1.4、1.6、1.8、2、2>。我该怎么办？