ld <- gald()
kml(ld,,5)
par(ask=TRUE)
### Default ploting
plot(ld)
### Only the trajectories in black
plot(ld,colorMean="no",colorTraj="black")
### Only the mean trajectories, with letters (for publication ?)
plot(ld,colorTraj="no",colorMean="black",point="letters",size=2)
### All at once.
plot(ld,colorMean="both",point="letters",size=2)
par(ask=FALSE)
Run the code above in your browser using DataLab