library(SSN)
mf04 <- importSSN(system.file("lsndata/MiddleFork04.ssn",
package = "SSN"), o.write = TRUE)
# Take out the data.frame, make a change and put it back
obs.df <- getSSNdata.frame(mf04)
obs.df$Year_cat <- as.factor(obs.df$SampleYear)
mf04 <- putSSNdata.frame(obs.df, mf04)
Run the code above in your browser using DataLab