Description Usage Arguments Value Examples
get_par
replaces names of parameters with par[i].
1 |
par |
Names of parameters, vector of character strings. |
object |
List consisting formulas. |
A list object consisting of equations for errors with par[i] (cheqs0
),
the original list with formulas (eqlab
), vector of parameters (parld
, same as par),
vector of parameters in form of par[i] (parn
, exogenous variables (exog
),
endogenous variables (endog
, in case of discrete ""),
number of parameters in each equation (neq_par
).
1 2 3 4 5 6 7 8 9 10 | # System of Non-linear Regressions
eq_c <- c("hg ~ exp( h0 + h1*log(tht) + h2*tht^2 + h3*elev)",
"dg ~ exp( d0 + d1*log(dbh) + d2*hg + d3*cr)")
par_c <- c(paste0("h", 0:3),paste0("d", 0:3))
para_cont <- get_par(par_c, eq_c)
# Indirect utility functions for discrete choice:
eq_d <- c("a1 + p1 * price_1 + p2 * catch_2", "a2 + p1 * price_2 + p2 * catch_2",
"a3 + p1 * price_3 + p2 * catch_3", "a4 + p1 * price_4 + p2 * catch_4")
par_d <- c(paste0("a", 1:4), paste0("p", 1:2))
disc_par <- get_par(par_d, eq_d)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.