Plot a north arrow.
north(pos = "topright", col = "grey20", south = FALSE)
data("nuts2006") plot(nuts0.spdf, col = "grey60",border = "grey20", add=FALSE)box()for (i in list("topleft", "top", "topright", "right", "bottomright", "bottom", "bottomleft", "left", c(3502127, 4770427))){ north(i) }plot(nuts0.spdf)box()for (i in list("topleft", "top", "topright", "right", "bottomright", "bottom", "bottomleft", "left", c(3502127, 4770427))){ north(i, south = TRUE) }