# NOT RUN {
data(RockBassLO2)
str(RockBassLO2)
head(RockBassLO2)
## extract aged sample
rb.aged <- subset(RockBassLO2,!is.na(age))
## extract length sample
rb.length <- subset(RockBassLO2,is.na(age))
# }
Run the code above in your browser using DataLab