# Copy the mf04p .ssn data to a local directory and read it into R
# When modeling with your .ssn object, you will load it using the relevant
# path to the .ssn data on your machine
copy_lsn_to_temp()
temp_path <- paste0(tempdir(), "/MiddleFork04.ssn")
mf04p <- ssn_import(temp_path, overwrite = TRUE)
# tailup only
ssn_mod1 <- ssn_lm(
formula = Summer_mn ~ ELEV_DEM,
ssn.object = mf04p,
tailup_type = "exponential",
additive = "afvArea"
)
# taildown only
ssn_mod2 <- ssn_lm(
formula = Summer_mn ~ ELEV_DEM,
ssn.object = mf04p,
taildown_type = "exponential"
)
glances(ssn_mod1, ssn_mod2)
Run the code above in your browser using DataLab