Skip to content
Back to formatted view

Raw Message

Message-ID: <4FF48055.1010603@sapo.pt>
Date: 2012-07-04T17:41:41Z
From: Rui Barradas
Subject: About nlminb function
In-Reply-To: <1341419854516-4635421.post@n4.nabble.com>

Hello,

Try


makeFunction <- function(x) eval( parse(text=x) )

name <- 'hdev'
nlminb(c(9, 12), objective = makeFunction(name))

Hope this helps,

Rui Barradas

Em 04-07-2012 17:37, Freddy Hern?ndez escreveu:
> Hello
>
> I want to use the nlminb function but I have the objective function like
> characters. I can summarize the problem using the first example in the
> nlminb documentation.
>
> x <- rnbinom(100, mu = 10, size = 10)
> hdev <- function(par)   -sum(dnbinom(x, mu = par[1], size = par[2], log =
> TRUE))
> nlminb(c(9, 12), objective=hdev)
>
> With the last instructions we obtain appropriate results. If I have the name
> of the objective function stored in the element name, how can modify the
> next two instructions to obtain the same above results?
>
> name <- 'hdev'
> nlminb(c(9, 12), objective=name)
>
> Thanks for the reply.
>
> Freddy.
>
> --
> View this message in context: http://r.789695.n4.nabble.com/About-nlminb-function-tp4635421.html
> Sent from the R help mailing list archive at Nabble.com.
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>