x11(width=8,height=3)
feather.plot(0.6+rnorm(8)/5,seq(0,7*pi/4,by=pi/4),1:8,
main="Standard Coordinates",xlab="Time",ylab="Value")
feather.plot(0.6+rnorm(8)/5,seq(0,7*pi/4,by=pi/4),1:8,
main="Meteorological Coordinates",xlab="Time",ylab="Value",
fp.type="m",xlabels=TRUE)
dev.off()
Run the code above in your browser using DataLab