ฉันจะเปลี่ยนสีเติมรูปหลายเหลี่ยมและสีเส้นขอบสำหรับวัตถุ SpatialPolygons ได้อย่างไร

ฉันมี SpatialPolygons หรือ SpatialPolygonsDataFrames ซึ่งฉันต้องการลงจุด ฉันจะเปลี่ยนสีโดยใช้ระบบการลงจุดทั้งสามใน R (กราฟิกพื้นฐาน, ขัดแตะกราฟิกและ ggplot2) ได้อย่างไร

ข้อมูลตัวอย่าง:

library(sp)
Srs1 = Polygons(list(Polygon(cbind(c(2,4,4,1,2),c(2,3,5,4,2)))), "s1")
Srs2 = Polygons(list(Polygon(cbind(c(5,4,2,5),c(2,3,2,2)))), "s2")

SpDF <- SpatialPolygonsDataFrame( SpatialPolygons(list(Srs1,Srs2)), 
            data.frame( z=1:2, row.names=c("s1","s2") ) )
spplot(SpDF, zcol="z")

กราฟิกฐาน ( plot)

สำหรับกราฟิกพื้นฐานให้col=ตั้งค่าการเติมและborder=ตั้งค่าสีขอบ

plot(SpDF, col="red",border="green")

หากคุณต้องการแผนที่แบบคนรอบข้างให้ตั้งค่าcol=เวกเตอร์ของสีหนึ่งอันสำหรับค่าข้อมูลของรูปหลายเหลี่ยมแต่ละอัน

กราฟิก Lattice ( spplot)

ซึ่งแตกต่างจากกราฟิกฐานcol=ตัวเลือกสำหรับกราฟิกขัดแตะควบคุมสีของเส้นขอบ ไม่มีพรมแดนชุดcol=NAcol="transparent"หรือ

spplot(SpDF, zcol="z", col=NA)

สำหรับการเติมรูปหลายเหลี่ยมตั้งcol.regionsเพื่อโครงการ R สีมาตรฐาน ( gray, rainbow.colors, topo.colorsฯลฯ ):

spplot(SpDF, zcol="z", col.regions=gray(seq(0,1,.01)))

ggplot2

ตามปกติสำหรับ ggplot2 คุณระบุระดับและเลือกโทนสี อย่างไรก็ตามคุณสามารถแทนที่โครงร่างสำหรับพล็อตทั้งหมดได้ รายละเอียดที่ต้องติดตามในบางจุด