
km(r, d, var = "O", conf = 0.95,age.seq=seq(1,length(r)),
ylab="Pr(survivorship from 1st age class)",xlab="Age class", ...)
"O"
= Oakes, "G"
= Greenwood.plot
.##Example from Pollock (1989)
r<-c(18,18,18,16,16,16,15,15,13,10,8,8,7)
d<-c(0,0,2,0,0,1,0,1,1,1,0,0,0)
km(r,d)
Run the code above in your browser using DataLab