je souhaite ajouter des plots de camemberts sur un raster en fonction de cordonnées géographique longitude, latitude. J'ai pensé à faire un subplot (pie(....)) mais ça ne marche pas. Quelqu'un peut m'aider a résoudre ce probleme meerci d'avance. Voici mon code:
Code : Tout sélectionner
Sta<- read.table (file= "C:/..................txt", header=T, sep="\t", stringsAsFactors=F)
as.data.frame (Sta)
str (Sta)
Sta.End<- Sta[,1:5]
require(TeachingDemos)
for (i in 1:nrow(Sta.End))
subplot(pie((Sta.End[i, 4:5], use.names=F),
axes=F,
col=rainbow(3), ylim=range(Sta.End[,4:5])),
x=Sta.End[i, 'LON'], y=Sta.End[i, 'LAT'], size=c(.4, .4))
legend("bottomleft", legend=names(Sta.End[, 4:5]), fill=rainbow(3))