Displaying 1 result from an estimated 1 matches for "maxlk".
Did you mean:
maxk
2008 Sep 19
0
panel data analysis possible with mle2 (bbmle)?
...]*(1+agwth[i,1:cross])
rr1[i,1:cross]=atech[i,1:cross]/cfrontr1[i,1:cross]}
pcdiffun <- function(a,b) (a-b)/b
pcdif <- pcdiffun(atech[2:years,],aobs[2:years,]);sd1 = sd(pcdif)
rt1 = -sum(dnorm(pcdif,mean=0,sd=sd1,log=TRUE))}
##############here is where the function ends
library(bbmle)
maxlk <- mle2(exfunc,
start=list(c1 = -3.74466306894815,c2 = -0.240135942405391,c3 =
4.44168922065451,
cs1 = 0.962506678868304,cs2 = 0.965725991431272,cs3 =
0.80188688385734,
ic1 = 2.25406162804465,ic2 = 1.68235691305909,ic3 =
2.13468107737406,
c...