tmp = try(.C("c_dbmestimate", y = as.double(y), x = as.double(as.vector(x)),
mpu = as.double(mpu), mpuinit = as.double(rcs),
omega = as.double(omega), alpha = as.double(alpha),
delta = as.double(delta), beta = as.double(beta),
k = as.double(k), Cost = as.double(Cost),
lik = double(n), llh = double(1), idx = as.integer(idx),
xidx = as.integer(xidx), T = as.integer(n),
PACKAGE="dbm"), silent = TRUE)