testlen<-c(rnorm(36)*2+5)
testpos<-seq(0,350,by=10)
polar.plot(testlen,testpos,main="Test Polar Plot",lwd=3,line.col=4)
polar.plot(testlen,testpos,main="Test Clockwise Polar Plot",
start=90,clockwise=TRUE,lwd=3,line.col=4)
# reset the margins
par(mar=c(5,4,4,2))
Run the code above in your browser using DataLab