Displaying 1 result from an estimated 1 matches for "bkf_max".
Did you mean:
af_max
2010 Sep 15
1
approxfun returning value higher than I would expect
...t;623",
"624", "625", "626", "627", "628"), class = "data.frame"))
measure_bkf_not_zero <- subset(measure_bkf, measure_bkf$bankfull_depths_m!=0)
bkf_min <- which.max(measure_bkf_not_zero[,"bankfull_depths_m"]<0)
bkf_max <- which.max(measure_bkf_not_zero[,"bankfull_depths_m"])
#bkf_min <- ifelse(length(bkf_min)>1, bkf_min[1], bkf_min)
#bkf_max <- ifelse(length(bkf_max)>1, bkf_max[1], bkf_max)
#s <- with(measure_bkf_not_zero, approx(measurment_num,
bankfull_depths_m,
xout=seq(measure_bk...