Example: longleaf

plot(longleaf2, cols = "grey60")
plot(qc, add = TRUE, cex = 1.2)