## ---- include = FALSE---------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  eval = FALSE
)

## ----setup--------------------------------------------------------------------
#  library(agena.ai)

## -----------------------------------------------------------------------------
#  #setwd("/Users/user/repos/api-r")

## -----------------------------------------------------------------------------
#  model <- from_cmpx("CarCosts.cmpx")
#  network <- model$networks[[1]]

## -----------------------------------------------------------------------------
#  create_csv_template(model)

## -----------------------------------------------------------------------------
#  inputData <- "CarCosts_DataSet_Modified.csv"

## -----------------------------------------------------------------------------
#  create_batch_cases(model, inputData)

## -----------------------------------------------------------------------------
#  model_with_cases <- from_cmpx("Car Costs_0 Model_Batch_Cases.json")

## -----------------------------------------------------------------------------
#  local_api_batch_calculate(model_with_cases)

