QMRA on learning case

Run a learning case to evaluate risk on scenario with 6 crops (Corn Seed, Tomato, Potato, Salad, Onion) and 6 populations (maintainer, harverster, irrigation, consumer, local resident, passerby). Run QMRA calculation with barrier measures

Usage

run_qmra_learning_case()

Value

all_plots list

Examples

# \donttest{
run_qmra_learning_case()
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 3, min: 0.050000, max: 0.050000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 12, min: 0.001000, max: 0.001000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 20, min: 0.001740, max: 0.001740)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 20, min: 0.001000, max: 0.001000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 3, min: 0.030000, max: 0.030000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 10, min: 0.000100, max: 0.000100)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 20, min: 0.000800, max: 0.000800)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 20, min: 0.001000, max: 0.001000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 48, min: 0.009000, max: 0.009000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 3, min: 0.030000, max: 0.030000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 20, min: 0.000800, max: 0.000800)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 20, min: 0.001000, max: 0.001000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 96, min: 0.006000, max: 0.006000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 3, min: 0.010000, max: 0.010000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 48, min: 0.001000, max: 0.001000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 12, min: 0.001000, max: 0.001000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 20, min: 0.000800, max: 0.000800)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 96, min: 0.003750, max: 0.003750)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 3, min: 0.010000, max: 0.010000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 48, min: 0.001000, max: 0.001000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 48, min: 0.001000, max: 0.001000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 20, min: 0.000800, max: 0.000800)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 48, min: 0.015000, max: 0.015000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 3, min: 0.005000, max: 0.005000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 48, min: 0.001000, max: 0.001000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 48, min: 0.001000, max: 0.001000)
#> Simulated exposure: volume per event
#> Distribution set from 'triangle' to 'uniform' because 'min' equals 'max'
#> Create 1000 random distribution(s): uniform (n: 48, min: 0.002500, max: 0.002500)
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 3, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 12, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 20, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 20, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 3, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 10, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 20, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 20, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 48, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 3, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 20, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 20, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 96, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.01 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 3, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 48, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 12, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 20, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 96, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.01 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 3, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 48, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 48, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 20, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 48, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 3, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 48, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 48, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Simulated pathogen: Rotavirus
#> Create 1000 random distribution(s): uniform (n: 48, min: 100.000000, max: 5000.000000)
#> Providing inflow events ... ok. (0.00 secs) 
#> Providing inflow paras ... ok. (0.00 secs) 
#> Create 1000 random distribution(s): uniform (n: 3, min: 1.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 12, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 12, min: 2.000000, max: 4.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: P.5 - Natural die-off for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: P.5 - Natural die-off for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 20, min: 1.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 20, min: 1.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 3, min: 1.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 10, min: 1.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 20, min: 1.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 20, min: 1.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 48, min: 5.000000, max: 7.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: P.7 - Cooking for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: P.7 - Cooking for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 3, min: 1.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 20, min: 1.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 20, min: 1.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 96, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 96, min: 2.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 96, min: 2.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: P.8 - Drying for Viruses
#> Simulated treatment: P.9 - Peeling for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: P.8 - Drying for Viruses
#> Simulated treatment: P.9 - Peeling for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 3, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 3, min: 1.000000, max: 1.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 48, min: 4.000000, max: 4.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 12, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 12, min: 4.000000, max: 4.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 20, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 20, min: 1.000000, max: 1.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 96, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 96, min: 4.000000, max: 4.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 3, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 3, min: 1.000000, max: 1.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 1.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 1.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 20, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 20, min: 1.000000, max: 1.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 1.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.1 - Micro-sprinkler for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 3, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 3, min: 2.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.2 - Surface drip irrigation for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.2 - Surface drip irrigation for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 48, min: 2.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.2 - Surface drip irrigation for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.2 - Surface drip irrigation for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 48, min: 2.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.2 - Surface drip irrigation for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.2 - Surface drip irrigation for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> Create 1000 random distribution(s): uniform (n: 48, min: 1.000000, max: 2.000000)
#> Create 1000 random distribution(s): uniform (n: 48, min: 2.000000, max: 2.000000)
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.2 - Surface drip irrigation for Viruses
#> Simulated treatment: Q.1 - Activated Sludge for Viruses
#> Simulated treatment: E.1.2 - Surface drip irrigation for Viruses
#> Joining with `by = join_by(TreatmentID)`
#> Joining with `by = join_by(TreatmentID)`
#> $concentration

#> 
#> $volume

#> 
#> $logreduction
#> $logreduction$Viruses

#> 
#> 
#> $dalys
#> $dalys$Rotavirus

#> 
#> 
#> $regul_matrix_log
#> 
#> $regul_matrix_concentration
#> 
#> $economic
#> $economic$annual
#> Warning: Removed 12 rows containing missing values or values outside the scale range
#> (`geom_bar()`).
#> Warning: Removed 12 rows containing missing values or values outside the scale range
#> (`geom_text()`).

#> 
#> $economic$allocation_key
#> [1] NA
#> 
#> 
# }