if (require("TMB")) {
if (FALSE) {
runExample("simple",thisR=TRUE)
class(obj) <- "TMB"
tidy(obj,conf.int=TRUE,conf.method="wald")
}
if (FALSE) tidy(obj,conf.int=TRUE,conf.method="uniroot")
if (FALSE) tidy(obj,conf.int=TRUE,conf.method="profile")
}
Run the code above in your browser using DataLab