Commit 33b9f9b4 authored by Josef Daňa's avatar Josef Daňa
Browse files

updated coef counted using slider 533

parent 34e01aa7

pdg-cooperation-simulator.nlogo

+3 −2
Original line number Diff line number Diff line
@@ -507,6 +507,7 @@ to go 
  [

    ; specify the maximum of values that were produced by the employees during one period of time

    let max-new-values max [sum-generated-value - boss-reaction-time * own-performance] of turtles

    let max-new-cooperations max [ number-of-cooperation / (number-of-cooperation + number-of-defects) ] of turtles



    ; recalculate the average of generated values

    ask turtles [
@@ -521,7 +522,7 @@ to go 


      let tmp-coop-coef 0

      if number-of-cooperation + number-of-defects > 0 [

        set tmp-coop-coef number-of-cooperation / (number-of-cooperation + number-of-defects)

        set tmp-coop-coef (number-of-cooperation / (number-of-cooperation + number-of-defects)) / max-new-cooperations

      ]



      ; use boss insight for cooperation
@@ -530,7 +531,7 @@ to go 
      set tmp-sum-coef boss-insight-performance * tmp-sum-coef + (1 - boss-insight-performance) * random-float 1



      ; coef counted using slider

      set self-evaluation (1 - sum-generated-vs-cooperation) * tmp-sum-coef + sum-generated-vs-cooperation * tmp-coop-coef

      set self-evaluation (1 - cooperation-part) * ((1 - sum-generated-vs-cooperation) * tmp-sum-coef) + cooperation-part * (sum-generated-vs-cooperation * tmp-coop-coef)

    ]



    let average-self-evaluation sum [self-evaluation] of turtles / count turtles ; variable used for evaluation of employee