Boa tarde caros colegas,

Estou plotando um mapa com o seguinte script:

library(maptools)

library(maps)

library(mapdata)

library(mapproj)

library(sp)

SHP22 <- readShapeSpatial("hidrografia_poligonos_utm22.shp")

#Plotar o mapa

x11()

par(mar=c(2,2,2,4.2)) # ajustando as margens (bottom, left, top, right)

plot(SHP22, col='light blue', axes=F, ylim=c(6441000,6530000),xlim=c(380000,410000))

#adicionando eixo no mapa

axis(4, las=1, cex.axis=0.9) #adicionando latitude do lado direito do mapa

axis(1, las=1, cex.axis=0.9) #adicionando longitude abaixo do mapa

Mas quando tento plotar a rosa dos ventos com a seguinte função:

compassRose(430000,6525000, rot=0, cex=0.65)

aparece o erro:

Error: could not find function "compassRose".

Alguém saberia me dizer o que posso fazer?

Grata desde já pela atenção,

Att.,

Aline