[R] Legend for radial.plot?

[Jim Lemon]

Jason Rupert wrote:
> Using plotrix, is it possible to create a legend for the following and attach it to the radial.plot?
>  
> posmat<-matrix(sample(2:9,30,TRUE),nrow=3)
>  radial.plot(posmat,labels=paste("X",1:10,sep=""),rp.type="p",
>   main="Spiderweb plot",line.col=2:4,show.grid=FALSE,lwd=1:3,
>   radial.lim=c(0,10))
>
>   
par(xpd=TRUE)
legend(5,-8,c("Red","Green","Blue"),lty=1,lwd=1:3,col=2:4)
par(xpd=FALSE)


Jim