Как убрать zcol ящики в spplot?

Question

Я хотел бы снять флажок с именами переменных в spplot ("кадмий", "медь", ... в приведенном ниже примере) или хотя бы изменить их персиковый цвет.

library(sp)
rv = list("sp.polygons", meuse.riv, fill = "lightblue")
scale = list("SpatialPolygonsRescale", layout.scale.bar(), 
offset = c(180500,329800), scale = 500, fill=c("transparent","black"), which = 4)
text1 = list("sp.text", c(180500,329900), "0", cex = .5, which = 4)
text2 = list("sp.text", c(181000,329900), "500 m", cex = .5, which = 4)
arrow = list("SpatialPolygonsRescale", layout.north.arrow(), 
offset = c(181300,329800), 
scale = 400, which = 4)
cuts = c(.2,.5,1,2,5,10,20,50,100,200,500,1000,2000)
spplot(meuse, c("cadmium", "copper", "lead", "zinc"), do.log = TRUE,
key.space = "right", as.table = TRUE,
sp.layout=list(rv, scale, text1, text2, arrow), # note that rv is up front!
main = "Heavy metals (top soil), ppm", cex = .7, cuts = cuts)

Answer 1

spplot вызывает решетчатую графику, поэтому вы можете передавать дополнительные параметры для протоколов (называемых полосами), используя par.settings. Для полного списка параметров, которые вы можете передать, проверьте таблицу 23.3 руководства по решетке . Вы бы указали их в списке, как показано ниже:

my.settings <- list(
  strip.background=list(col="lightblue"),
  strip.border=list(col="transparent")
)

spplot(meuse, c("cadmium", "copper", "lead", "zinc"), do.log = TRUE,
key.space = "right", as.table = TRUE,
sp.layout=list(rv, scale, text1, text2, arrow), # note that rv is up front!
main = "Heavy metals (top soil), ppm", cex = .7, cuts = cuts,
par.settings=my.settings)