powered by
plotArrow(shape="", pos = 1, offset.arrow = c(0, 0), north.lwd = par()$lwd+2, north.col = par()$col, ...)
col
lwd
cex
plotLayers