Running examples in ‘OnAge-Ex.R’ failed
The error most likely occurred in:

> ### Name: onset.test
> ### Title: Tests the null hypothesis that the age at the onset of
> ###   senescence is the same in two groups
> ### Aliases: onset.test
> 
> ### ** Examples
> 
> if(requireNamespace("lme4", quietly=TRUE)) {
+     data(RoeDeerMassData)
+     RoeDeerMassData$ID <- factor(RoeDeerMassData$ID)
+     RoeDeerMassData$cohort <- factor(RoeDeerMassData$cohort)
+ 
+     dataFCH <- RoeDeerMassData[RoeDeerMassData$sex%in%"F"&
+                                  RoeDeerMassData$population%in%"CH", ]
+     dataMCH <- RoeDeerMassData[RoeDeerMassData$sex%in%"M"&
+                                  RoeDeerMassData$population%in%"CH", ]
+     dataFTF <- RoeDeerMassData[RoeDeerMassData$sex%in%"F"&
+                                  RoeDeerMassData$population%in%"TF", ]
+     dataMTF <- RoeDeerMassData[RoeDeerMassData$sex%in%"M"&
+                                  RoeDeerMassData$population%in%"TF", ]
+ 
+     ## b1: function for piecewise regression (transforms x into 0 before bp)
+     b1 <- function(x, bp) ifelse(x < bp, 0, x - bp)
+ 
+     ## Use this function to define the model in which the differential
+     ## onset hypothesis is tested.
+     ll <- function(thr, dataIn){
+         logLik(lme4::lmer(body.mass ~ b1(age, thr) + age.at.last.capture + 
+             last.year.of.capture + (1|ID) + (1|cohort), data=dataIn, 
+             REML="FALSE"))
+     }
+ 
+     search.range <- c(6,12) # data not available before 6 years old
+     search.range.TF <- search.range.CH <- search.range
+ 
+     ## Not run: 
+ ##D       # if you don't run the example in RStudio, create a new graphic 
+ ##D       # window with suitable dimensions
+ ##D       if(.Platform$GUI!="RStudio") {dev.new(width=15, height=5)}
+ ##D       # all graphs are square
+ ##D       par(pty="s")
+ ##D       
+ ##D       # test for Trois Fontaines
+ ##D       res.tf <- onset.test(ll, dataFTF, dataMTF, search.range.TF, do.plot=TRUE)
+ ##D       
+ ##D       if(.Platform$GUI!="RStudio") {dev.new(width=15, height=5)}
+ ##D       par(pty="s")
+ ##D       
+ ##D       # test for Chizé
+ ##D       res.ch <- onset.test(ll, dataFCH, dataMCH, search.range.CH, do.plot=TRUE)
+ ##D       
+ ##D       cat(sprintf("p-value for differential age at onset is %g in 
+ ##D           Trois Fontaines, %g in Chizé", res.tf$pv, res.ch$pv))
+ ##D     
+ ## End(Not run)
+     
+     # a shorter executable example for Trois Fontaines
+     set.seed(40)
+     shortdataFTF <- dataFTF[sample(1:NROW(dataFTF), 200), ]
+     shortdataMTF <- dataMTF[sample(1:NROW(dataMTF), 100), ]
+     res.tf.short <- onset.test(ll, shortdataFTF, shortdataMTF, search.range.TF, 
+       do.plot=FALSE, CI.lvl=NA)
+   }
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 3.96327 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.07708 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.19779 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.29541 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.34466 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.3959 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.43758 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.46754 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.48773 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.50085 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.50921 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.51445 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.51774 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.51978 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52104 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52184 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52231 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52263 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52279 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52291 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52299 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52304 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52305 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52309 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data1, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52309 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 7.1877 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 7.38764 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 7.19879 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.99345 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.86267 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.7717 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.7132 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.67715 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.65519 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.64193 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.63384 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.6289 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62588 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62403 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.6229 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62217 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62172 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62148 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62129 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62121 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62114 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62108 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62107 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62105 (tol = 0.002, component 1)
Warning in optimize(ll, interval = search.range, dataIn = data2, maximum = TRUE,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62105 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 3.96327 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 7.1877 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.07708 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 7.38764 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.19779 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 7.19879 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.29541 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.99345 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.34466 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.86267 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.3959 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.7717 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.43758 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.7132 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.46754 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.67715 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.48773 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.65519 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.50085 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.64193 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.50921 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.63384 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.51445 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.6289 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.51774 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62588 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.51978 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62403 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52104 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.6229 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52184 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62217 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52231 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62172 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52263 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62148 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52279 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62129 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52291 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62121 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52299 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62114 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52304 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62108 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52305 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62107 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52309 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62105 (tol = 0.002, component 1)
Warning in optimize(ll.joint, interval = search.range, ll, data1 = data1,  :
  Inf replaced by maximum positive value
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 4.52309 (tol = 0.002, component 1)
Warning in optwrap(optimizer, devfun, getStart(start, rho$pp), lower = rho$lower,  :
  convergence code -2 from nloptwrap: NLOPT_INVALID_ARGS: Invalid arguments (e.g. lower bounds are bigger than upper bounds, an unknown algorithm was specified, etcetera).
Warning in checkConv(attr(opt, "derivs"), opt$par, ctrl = control$checkConv,  :
  Model failed to converge with max|grad| = 6.62105 (tol = 0.002, component 1)
Error in if (llr < 0) { : missing value where TRUE/FALSE needed
Calls: onset.test
Execution halted