| node_gamma | R Documentation |
Data from the parents is used to generate the node using gamma regression by applying the betas to the design matrix and sampling from the rgamma function.
node_gamma(data, parents, formula=NULL, betas,
intercept, shape, link="log")
data |
A |
parents |
A character vector specifying the names of the parents that this particular child node has. If non-linear combinations or interaction effects should be included, the user may specify the |
formula |
An optional |
betas |
A numeric vector with length equal to |
intercept |
A single number specifying the intercept that should be used when generating the node. |
shape |
A single positive number specifying the shape parameter ( |
link |
The link function used to transform the linear predictor to the conditional mean used in |
This function uses the linear predictor defined by the betas and the input design matrix to sample from a subject-specific gamma distribution. It does so by calculating the linear predictor using the data, betas and intercept, applying the inverse of the specified link function to obtain the conditional mean, and passing it to the rgamma function with shape=shape and scale=mu_i/shape of the stats package.
For an observation with conditional mean \mu_i and shape parameter \alpha, the generated outcome follows a gamma distribution with shape \alpha and scale \mu_i/\alpha. Consequently, the conditional mean is E(Y_i\mid X_i)=\mu_i and the conditional variance is \mathrm{Var}(Y_i\mid X_i)=\mu_i^2/\alpha.
Every non-missing conditional mean must be finite and strictly positive. This node type currently does not support inclusion of random effects or random slopes in the formula.
Returns a numeric vector of length nrow(data).
Robin Denz
empty_dag, node, node_td, sim_from_dag, sim_discrete_time
library(simDAG)
set.seed(124554)
dag <- empty_dag() +
node("age", type="rnorm", mean=50, sd=4) +
node("sex", type="rbernoulli", p=0.5) +
node("cost", type="gamma", shape=3,
formula= ~ 1.5 + age*0.01 + sexTRUE*0.2)
sim_dat <- sim_from_dag(dag=dag, n_sim=100, sort_dag=FALSE)
head(sim_dat)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.