Displaying 3 results from an estimated 3 matches for "bankfull".
2010 Sep 15
1
approxfun returning value higher than I would expect
Below is the code that I am using in a much larger function. I would
expect a bankfull measure at zero to be between 0.6 and 0.8 approxfun
is returning 0.8136986. I am sure that I am missing something.
measure_bkf <- (structure(list(measurment_num = c(0, 0.2, 0.4, 0.6,
0.8, 1, 1.2,
1.4, 1.6, 1.8, 2, 2.2, 2.4, 2.6, 2.8, 3, 3.2, 3.4), bankfull_depths_m
= c(-0.48,
-0.48, -0.42, -0....
2009 Dec 15
1
for loop for automatic pdf generation
....names)){
pdf(paste("~/Desktop/base_pdf_xsec/", list.names[i], ".pdf", sep=""))
qplot(measurment_num, value , data=subset(braggxsec.melt,
Creek==list.names[i]), colour=variable, geom="line", xlab="meters
across the channel", ylab="meters from bankfull", col="black",
linetype=variable,
main=list.names[i])+facet_grid(station~Creek)+scale_y_reverse(breaks=breaks)+scale_x_reverse()+theme_bw()+
opts(panel.grid.minor = theme_blank(), panel.grid.major=theme_blank())
dev.off()
}
--
Stephen Sefick
Let's not spend our time and resou...
2010 Feb 04
1
for loop with if statment problem
...L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L,
1L, 1L, 1L, 1L, 6L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L,
5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 5L, 4L, 4L, 4L, 4L, 4L, 4L, 4L,
4L, 4L, 4L, 4L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L,
3L, 3L, 3L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 1L,
1L, 1L), bankfull_measurement_interval_m = c(0.2, 0.2, 0.2, 0.2,
0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2,
0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2,
0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2,
0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0.2, 0....