Displaying 1 result from an estimated 1 matches for "expr23".
Did you mean:
expr2
2007 May 26
1
bug from nlm function (PR#9711)
...cH <-deriv(fllwform,c("a","b"),function(a,b,x){})
> fllwfuncH
function (a, b, x)
{
.expr2 <- log(b)
.expr4 <- a - 1
.expr5 <- log(x)
.expr6 <- .expr5 - .expr2
.expr9 <- x^a
.expr10 <- b^a
.expr19 <- .expr10^2
.expr23 <- 1/b
.value <- log(a) - .expr2 - .expr4 * .expr6 - .expr9/.expr10
.grad <- array(0, c(length(.value), 2), list(NULL, c("a",
"b")))
.grad[, "a"] <- 1/a - .expr6 - (.expr9 * .expr5/.expr10 -
.expr9 * (.expr10 * .expr2)/.ex...