## ---- 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)