Displaying 1 result from an estimated 1 matches for "cattail_1".
2010 Jun 14
1
script development for Unconditional Density and Probability estimation
...###############################################################################
Marsh <- cbind(SoilVegHydro, vegcode)
AnnualDepth <- Marsh[,'meanAnnualDepthAve']
cattail_0 <- Marsh[,'cattail'] == '0' # no need to run for 8
species, automate if possible
cattail_1 <- Marsh[,'cattail'] == '1' # yes need to run for 8
species
spbase.rate.d1 <- sum(cattail_1)/(sum(cattail_1) + sum(cattail_0) )
annualDepth.density <- density(AnnualDepth) # this line needs either
interactively defined or automatically cycle thru a number of met...