[[1]]
## `geom_smooth()` using formula 'y ~ x'
[[2]]
[[3]]
[[4]]
[[5]]
[[1]]
## `geom_smooth()` using formula 'y ~ x'
[[2]]
[[3]]
[[4]]
[[5]]
[[1]]
## `geom_smooth()` using formula 'y ~ x'
[[2]]
[[3]]
[[4]]
[[5]]
load("~/Dropbox/Pancho/05 - SystematicBiology (paper 2)/DEphasis/results/DD/level1/Cacatuidae.RData")
pars2 = c(1000,1,0,1,0,2)
pars_dd = DDD:::dd_ML(brts = input$brts,cond = 0,soc=2)
pars1 = c(pars_dd$lambda,pars_dd$mu,pars_dd$K)
pars1 = c(1.211,0.196,(1.211-0.196)/0.055 )
DDD:::dd_loglik(pars1 = pars1,pars2 = pars2,brts = input$brts,missnumspec = 0)
In this case, computing times are similar and we could make emphasis way faster if we cut off until iteration 30.
[[1]]
## `geom_smooth()` using formula 'y ~ x'
[[2]]
[[3]]
[[4]]
[[5]]
[[1]]
## `geom_smooth()` using formula 'y ~ x'
[[2]]
[[3]]
[[4]]
[[5]]
Caecilidae Hynobiidae Salamandridae Plethodontidae
42 60 103 440
Alytidae Bombinatoridae Pipidae Eleutherodactylidae
11 10 33 207
Alsodidae Ranidae
29 363
[[1]]
## `geom_smooth()` using formula 'y ~ x'
[[2]]
[[3]]
[[4]]
[[5]]
Xantusiidae Gerrhosauridae Cordylidae Varanidae Chamaeleonidae
34 35 64 73 198
Iguanidae Crotaphytidae Phrynosomatidae Pythonidae Viperidae
38 12 144 40 321
Colubridae
825
[[1]]
## `geom_smooth()` using formula 'y ~ x'
[[2]]
## geom_path: Each group consists of only one observation. Do you need to adjust
## the group aesthetic?
## geom_path: Each group consists of only one observation. Do you need to adjust
## the group aesthetic?
[[3]]
[[4]]
[[5]]
[[1]]
## `geom_smooth()` using formula 'y ~ x'
[[2]]
[[3]]
[[4]]
[[5]]
Comments about results