On Jul 30, 2011, at 5:13 AM, Dennis Murphy wrote:
Hi:
Try this:
set.seed(266)
dfm <- data.frame(c1 = sample(1:5, 10, replace = TRUE),
e1 = sample(1:3, 10, replace = TRUE),
c2 = sample(1:5, 10, replace = TRUE),
e2 = sample(1:3, 10, replace = T
Hi:
Try this:
set.seed(266)
dfm <- data.frame(c1 = sample(1:5, 10, replace = TRUE),
e1 = sample(1:3, 10, replace = TRUE),
c2 = sample(1:5, 10, replace = TRUE),
e2 = sample(1:3, 10, replace = TRUE),
c3 = sample(1:5, 10, replac
test<-by(vol,x, vol.exp)
Error in tapply(1L:45L, list(DBH = 80:200), function (x) :
arguments must have same length
*Ben *
On Sat, Jul 30, 2011 at 10:16 AM, Benjamin Caldwell wrote:
> Or maybe that function should look more like
>
> vol.exp<-function(x) {
> V<-((coefficient1*(x)^exponent1)
Or maybe that function should look more like
vol.exp<-function(x) {
V<-((coefficient1*(x)^exponent1)+(coefficient2*(x)^exponent2)+constant)
V
}
?
*Ben *
On Sat, Jul 30, 2011 at 10:06 AM, Benjamin Caldwell wrote:
> Hello,
>
> I'm just trying to wrap my head around the syntax for creating loop
4 matches
Mail list logo
