model
Model was written in NetLogo 6.2.0
•
Viewed 208 times
•
Downloaded 18 times
•
Run 0 times
Do you have questions or comments about this model? Ask them here! (You'll first need to log in.)
WHAT IS IT?
This model demonstrates the calculation of 'belief' within a simulation-based framework and provides a non-rationality
Netlogo version
6.2
Comments and Questions
Please start the discussion about this model!
(You'll first need to log in.)
Click to Run Model
breed [randomauditors randomauditor ] breed [learningauditors learningauditor] globals [totalfrauders Frauderscaughtla Frauderscaughtr] breed[pomdpauditors pomdpauditor] breed [randomfilers randomfiler] breed [learningfilers learningfiler] breed [pomdpfilers pomdpfiler] randomauditors-own [ frauders collect ] learningauditors-own [ frauders collect ] pomdpauditors-own [ frauders collect] randomfilers-own [selected compliance taxdue reward] learningfilers-own [selected compliance taxdue reward] pomdpfilers-own [selected compliance taxdue observe belief reward] to setup clear-all reset-ticks set totalfrauders 0 create-randomauditors 1[setxy random-xcor random-ycor set color green set shape "face neutral" set size 2 set collect 0] create-learningauditors 1[setxy random-xcor random-ycor set color yellow set shape "face neutral" set size 2 set collect 0 ] create-pomdpauditors 1[setxy random-xcor random-ycor set color red set shape "face neutral" set size 2 set collect 0 ] create-randomfilers 50[setxy random-xcor random-ycor set color green set shape "person" set selected false set compliance random 3 set taxdue random-normal 1000 100 ] create-learningfilers 50[setxy random-xcor random-ycor set color yellow set shape "person" set selected false set compliance random 3 set taxdue random-normal 1000 100] create-pomdpfilers 50[setxy random-xcor random-ycor set color red set shape "person" set selected false set compliance random 3 set taxdue random-normal 1000 100 set observe true set belief 0.5] end to go takeaction set Frauderscaughtla Frauderscaughtla + random 50 set Frauderscaughtr Frauderscaughtr + random 50 audit tick end to audit ask randomauditors [ let rs one-of turtles with [breed = randomfilers or breed = learningfilers or breed = pomdpfilers ] create-link-with rs ask rs [set selected true] ] end to learn end to updatebelief ask pomdpfilers [ ifelse (observe = true) [ let a count turtles with [selected = true and compliance = 0] let b count turtles with [selected = true and compliance = 1] let o 2 * a + b ] [ ]] end to takeaction ask randomfilers [set compliance random 3] ask learningfilers [] ask pomdpfilers [ ifelse (belief > 0.85) [set compliance 2 ] [ ifelse (belief > 0.65) [set compliance 1] [ ifelse (belief > 0.35) [set observe true] [set compliance 1] ] ]] end to rewardb ask turtles with [breed = randomfilers or breed = learningfilers or breed = pomdpfilers] [ if (selected = true) [ if ( compliance = 0) [ ] if (compliance = 1) [] if (compliance = 2) [] ] ] end ;; rate tax ;; consommateur ;; complexité ;; auditeur intelligent (data mining) ;;training with big data
There is only one version of this model, created over 1 year ago by ifelab lerma.
Attached files
File | Type | Description | Last updated | |
---|---|---|---|---|
model.png | preview | Preview for 'model' | over 1 year ago, by ifelab lerma | Download |
This model does not have any ancestors.
This model does not have any descendants.