Running examples in 'PDN-Ex.R' failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: draw.PDN
> ### Title: Draw Personalized Disease Network for one patient with network
> ###   and ggplot2
> ### Aliases: draw.PDN
> 
> ### ** Examples
> 
> #Select a subset of data for toy example
> comorbidity_data = comorbidity_data[c(1:10),]
> survival_data = survival_data[c(1:10),]
> #  Getting the names
> k1 = datecut(comorbidity_data,survival_data[,1],survival_data[,2])
Warning in max(a - b, na.rm = T) :
  no non-missing arguments to max; returning -Inf
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in max(a - b, na.rm = T) :
  no non-missing arguments to max; returning -Inf
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Loglik converged before variable  1 ; coefficient may be infinite. 
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
Warning in fitter(X, Y, istrat, offset, init, control, weights = weights,  :
  Ran out of iterations and did not converge
> a = buildnetworks(comorbidity_data,k1)
> #Plot PDN for patient 7
> nn = names(comorbidity_data)
> draw.PDN(a[7,],nn)
Error in set.vertex.attribute(g, "na", rep(FALSE, n), 1:n) : 
  attempt to set index 0/0 in SET_VECTOR_ELT
Calls: draw.PDN ... as.network.matrix -> network.initialize -> set.vertex.attribute
Execution halted