Combine Two mcmodule Objects — combine

Combines two mcmodule objects into a single mcmodule by merging their data and node lists.

Usage

combine_modules(mcmodule_x, mcmodule_y)

Arguments

mcmodule_x: (mcmodule object). First module.
mcmodule_y: (mcmodule object). Second module.

Value

An mcmodule object with combined data and node lists.

Examples

module_x <- list(
  data = list(data_x = data.frame(x = 1:3)),
  node_list = list(
    node1 = list(type = "in_node"),
    node2 = list(type = "out_node")
  ),
  modules = c("module_x"),
  exp = quote({node2 <- node1 * 2})
)

module_y <- list(
  data = list(data_y = data.frame(y = 4:6)),
  node_list = list(node3 = list(type = "out_node")),
  modules = c("module_y"),
  exp = quote({node3 <- node1 + node2})
)

module_xy <- combine_modules(module_x, module_y)