library(SSN)
# Create a SpatialStreamNetwork object that does not contain prediction points
mf04 <- importSSN(system.file("lsndata/MiddleFork04.ssn",
package = "SSN"), o.write = TRUE)
# Create a SpatialStreamNetork object that also contains prediction sites
mf04p <- importSSN(system.file("lsndata/MiddleFork04.ssn",
package = "SSN"), predpts = "pred1km", o.write = TRUE)
names(mf04p)
#NOT RUN Some graphics to explore imported object
#hist(mf04, "Summer_mn")
#boxplot(mf04, "Summer_mn")
#plot(mf04, cex = .8, xlab = "x", ylab = "y")
#plot(mf04p, PredPointsID = "pred1km", add = TRUE, pch = 1) #add to previous plot
Run the code above in your browser using DataLab