eval_strategy_newdata: Iteratively Evaluate a Markov Model With New Parameter Values

Description Usage Arguments Details Value Examples

View source: R/newdata.R

Description

Given a data.frame with on set of new parameters values per row, iteratively evaluate the model over the set of new values.

Usage

1
eval_strategy_newdata(x, strategy = 1, newdata)

Arguments

x

Result from run_model().

newdata

a data.frame whose names match parameters names. model will be evaluated iteratively, taking successive values from each row.

model

Name or index of model to recompute.

Details

New parameters with a missing value (NA) do not replace existing parameters.

Value

A data.frame containing the values of newdata and each Markov Model evaluation in res.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
par1 <- define_parameters(
  a = 1,
  b = 1 / (markov_cycle + a)
)

mat1 <- define_transition(
  1-b, b,
  0, 1
)
mod1 <- define_strategy(
  transition = mat1,
  define_state(var = a),
  define_state(var = a * markov_cycle)
)

res1 <- run_model(
  mod1,
  parameters = par1,
  cycles = 5,
  init = 1:0,
  method = "end"
)

new_tab <- data.frame(
  a = 1:10
)

heemod:::eval_strategy_newdata(
  res1,
  newdata = new_tab
)

heemod documentation built on July 8, 2020, 6:55 p.m.