evol_game_simu 0.1.1 → 0.2.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 681faa7e19c2e016796984902bab09570abcb26037f55cae98603db5454a8d78
-  data.tar.gz: 478de2a71df41746282373dfb3162b9420e2548b6ec3345ddffa143458b0d941
+  metadata.gz: 03c47726493c14799f0496b0ab9f134ef1860d63c0d03d1fb443bd5da2d54e5e
+  data.tar.gz: 9f02d4c6bd3290f60323f586f53973741cc86d445522cee8a813b24a9b992bcc
 SHA512:
-  metadata.gz: 79afff3307d74ec3cc4cbb5f0abde8896bc2eacf430ecdcedf6949f6c8a1eadcf02968e1fabfb8b6b25d31849ab13c1d67373ca36858b5e002b0399986e4e873
-  data.tar.gz: b2100f14b330c61bddd542ded41f4a9fcbc246c04325fd0c847fe9124713420120aab5d2888491af1d7fa631316df484f984dec71755d4a46acf676180f95265
+  metadata.gz: 2d0430da58d375e8827f643075d1513e0bef90e1f7bcf119c492f4068fc1cc959416e149a756d99b9a80500372ccd9a6c5dfd7e411c750a5b88138e2cc86e634
+  data.tar.gz: 2e19d179aeeaea1174cfe1a2ec54619fb900722a2a9e4c4bff9c3cf388d7107873e480e4883b78a9416a93b15b4302a1f290575d57677c686576f30cbcc4ec92

data/Gemfile.lock

@@ -1,7 +1,7 @@
 PATH
   remote: .
   specs:
-    evol_game_simu (0.1.1)
+    evol_game_simu (0.2.1)
 
 GEM
   remote: https://rubygems.org/

data/lib/evol_game_simu/version.rb

@@ -1,3 +1,3 @@
 module EvolGameSimu
-  VERSION = "0.1.1"
+  VERSION = "0.2.1"
 end

data/lib/evol_game_simu.rb

@@ -1,19 +1,27 @@
 require "evol_game_simu/version"
 
-$Cooperator = [0,0, [[0, [0, 0]]]]
-$Defector = [0,0, [[1, [0, 0]]]]
-$Titfortat = [0,0, [[0, [0, 1]],
-                    [1, [0, 1]]]]
+# now i say again
+# this time, it was also very tempting to do mutation
+# but then please remember this bug
+# you mutate at posn x, somehow it mutates also at posn y
+# it breaks your simulation
+# you cannot even manually set the value in posn y back
+# wow
+
+$Cooperator = [0, [[0, [0, 0]]]].freeze
+$Defector = [0, [[1, [0, 0]]]].freeze
+$Titfortat = [0, [[0, [0, 1]],
+                  [1, [0, 1]]]].freeze
 def Cooperator()
-  $Cooperator
+  $Cooperator.clone
 end
 def Defector()
-  $Defector
+  $Defector.clone
 end
 def Titfortat()
-  $Titfortat
+  $Titfortat.clone
 end
-$PAY = [[[3,3],[0,4]],[[4,0],[1,1]]]
+$PAY = [[[3,3],[0,4]],[[4,0],[1,1]]].freeze
 $ACTION = 2
 $DELTA = 0.9
 $ROUNDS = 400
@@ -21,39 +29,37 @@ def generate_deltas(delta, rounds)
   result = (0..rounds-1).to_a
   result.map { |round| delta ** round }
 end
-$DELTAS = generate_deltas($DELTA, $ROUNDS)
+$DELTAS = generate_deltas($DELTA, $ROUNDS).freeze
 
 def sum(arr)
   arr.reduce() { | total, n | total += n }
 end
 def interact(machine1,machine2,rounds)
   result = []
-  (1..rounds).reduce(result) do | result |
-    current1,current2 = machine1[1],machine2[1]
-    states1, states2 = machine1[2], machine2[2]
+  current1, current2 = machine1[0],machine2[0]
+  (1..rounds).reduce(result) do | result |    
+    states1, states2 = machine1[1], machine2[1]
     cstate1, cstate2 = states1[current1], states2[current2]
     action1,action2 = cstate1[0], cstate2[0]
     dispatch1,dispatch2 = cstate1[1], cstate2[1]
-    machine1[1],machine2[1] = dispatch1[action2], dispatch2[action1]
+    current1, current2 = dispatch1[action2], dispatch2[action1]
     result << $PAY[action1][action2]
   end
-  machine1[1],machine2[1]=machine1[0],machine2[0]
   result
 end
 def match_machines(machine1,machine2,rounds, deltas)
   pay1, pay2 = 0, 0
+  current1, current2 = machine1[0], machine2[0]
   for i in 0..rounds-1 do
-    current1,current2 = machine1[1],machine2[1]
-    states1, states2 = machine1[2], machine2[2]
+    states1, states2 = machine1[1], machine2[1]
     cstate1, cstate2 = states1[current1], states2[current2]
     action1,action2 = cstate1[0], cstate2[0]
     dispatch1,dispatch2 = cstate1[1], cstate2[1]
-    machine1[1],machine2[1] = dispatch1[action2], dispatch2[action1]
+    current1,current2 = dispatch1[action2], dispatch2[action1]
     p1,p2 = $PAY[action1][action2]
     pay1 += p1*deltas[i]
     pay2 += p2*deltas[i]
   end
-  machine1[1], machine2[1] = machine1[0] , machine2[0]
   return pay1.round(2), pay2.round(2)
 end
 def generate_dispatch(states)
@@ -65,96 +71,116 @@ end
 def generate_machine(states)
   init = rand(states)
   m = Array.new(states) { generate_state(states) }
-  [init,init]+[m]
-end
-
-def reset_machine(machine)
-  machine[1] = machine[0]
+  m = [init]+[m]
+  m.freeze
 end
-
 def mutate_init(machine)
-  states = machine[2].length
-  newinit = rand(states)
+  init, ss = machine
+  newinit = rand(ss.length)
   puts "initial state: #{machine[0]} -> #{newinit}"
-  machine[0], machine[1] = newinit, newinit
-  return
+  new = [newinit] + [ss]
+  new.freeze
 end
 
 def mutate_action(machine)
-  states = machine[2].length
-  state = rand(states)
-  newact = rand($ACTION)
-  puts "state #{state}: change action #{machine[2][state][0]} -> #{newact}"
-  machine[2][state][0] = newact
-  return
-end
-
-def mutate_dispatch!(machine)
-  states = machine[2].length
-  state = rand(states)
-  reactto = rand($ACTION)
+  init, states = machine
+  ss = states.length
+  s = rand(ss)
   newact = rand($ACTION)
-  puts "state #{state}: change reaction to #{reactto} from #{machine[2][state][1][reactto]} -> #{newact}"
-  machine[2][state][1][reactto] = newact
-  return
+  puts "state #{s}: change action #{machine[1][s][0]} -> #{newact}"
+  newss = []
+  for i in 0..ss-1 do
+    if i == s
+      newss << [newact, states[i][1].clone]
+    else
+      newss << states[i].clone
+    end
+  end
+  newss = [init] + [newss]
+  newss.freeze
 end
 
 def mutate_dispatch(machine)
-  i, c, ss = machine
-  s = rand(ss.length)
+  init, states = machine
+  ss = states.length
+  s = rand(states.length)
   reactto = rand($ACTION)
-  newact=rand($ACTION)
-  puts "state #{s}: change reaction to #{reactto} from #{machine[2][s][1][reactto]} -> #{newact}"
-
-  b = []
-  for index in 0..ss.length-1 do
-    if index == s
-      act, disp = ss.dup[index].dup
+  newdispatch=rand(ss)
+  puts "state #{s}: change reaction to #{reactto} from #{machine[1][s][1][reactto]} -> #{newdispatch}"
+  newss = []
+  for i in 0..ss-1 do
+    if i == s
+      act, disp = states[i].clone
       toc, tod = disp
       if reactto == 0
-        toc = newact
+        toc = newdispatch
       else
-        tod = newact
+        tod = newdispatch
       end
-      b << [act, [toc, tod]]
+      newss << [act, [toc, tod]]
     else
-      b << ss.dup[index].dup
+      newss << states[i].clone
     end
   end
-  b = [i,c]+[b]
-  machine = b
-  return
+  newss = [init] + [newss]
+  newss.freeze
 end
   
-
 def add_state(machine)
-  newstates = machine[2].length + 1
-  newstate = generate_state(newstates)
-  machine[2] << newstate
-  oldstate = rand(newstates - 1)
+  init, states = machine
+  ss = states.length
+  newss = ss + 1
+  newstate = generate_state(newss)
+
+  newstates = []
+  s = rand(ss)
   moveendof = rand($ACTION)
-  puts "add new state at the end: state #{oldstate}: reaction to #{moveendof} goes to the new state"
-  machine[2][oldstate][1][rand($ACTION)] = machine[2].length - 1
-  return
+  puts "add new state at the end: state #{s}: reaction to #{moveendof} goes to the new state"
+
+  for i in 0..ss-1 do
+    if i == s
+      act, disp = states[i].clone
+      toc, tod = disp
+      if moveendof == 0
+        toc = newss - 1
+      else
+        tod = newss - 1
+      end
+      newstates << [act, [toc, tod]]
+    else
+      newstates << states[i].clone
+    end
+  end
+  newstates << newstate
+  newstates = [init] + [newstates]
+  newstates.freeze
 end
 def random_member(arr)
   arr[rand(arr.length)]
 end
 def del_state(machine)
-  states = machine[2].length
-  return puts "\n" if states == 1
-  pos = (0..states-1).to_a
-  state = rand(states)
-  pos.delete_at(state)
-  for i in 0..states-1 do
-    dispatch = machine[2][i][1]
-    dispatch[0] = random_member(pos) if dispatch[0] == state
-    dispatch[1] = random_member(pos) if dispatch[1] == state
+  init, states = machine
+  ss = states.length
+  if ss == 1
+    puts "\n"
+    return machine.clone
   end
-  puts "delete state #{state}"
+  pos = (0..ss-1).to_a
+  s = rand(ss)
+  pos.delete_at(s)
+  newss = []
+  for i in 0..ss-1 do
+    act, dispatch = states[i]
+    toc, tod = dispatch
+    toc = random_member(pos) if toc == s
+    tod = random_member(pos) if tod == s
+    newss << [act, [toc, tod]]
+  end
+  puts "delete state #{s}"
+  newss = [init] + [newss]
+  newss.freeze
 end
-def mutate_machine(machine,i)
-  print("machine #{i}: ")
+def mutate_machine(machine)
   r = rand(5)
   case r
   when 0
@@ -172,7 +198,6 @@ end
 def generate_population(n)
   Array.new(n) { generate_machine(1) }
 end
-
 def match_population(p,n,rounds,deltas)
   res = []
   for i in (0..n-2).step(2) do
@@ -221,22 +246,19 @@ def throws(arr,s)
   res
 end
 
-def regenerate(p,arr)
+def regenerate!(p,arr)
   subs = arr.map{|e| p[e]}
   for i in 0..subs.length-1 do
     p[i] = subs[i]
   end
 end
  
-def mutate(p,n)
+def mutate!(p,n)
   for i in 0..n-1 do
-    mutate_machine(p[i],i)
+    p[i] = mutate_machine(p[i])
   end
 end
 
-def reset(population)
-  population.map{ |machine| reset_machine(machine) }
-end
 $N = 100
 $P = generate_population $N
 def evolve(p,n,cycles,speed,mutation,rounds,deltas)
@@ -252,10 +274,10 @@ def evolve(p,n,cycles,speed,mutation,rounds,deltas)
     a = accumulate(res)
     t = throws(a, speed)
 
-    regenerate(p,t)
+    regenerate!(p,t)
     p.shuffle!
-    mutate(p,mutation)
-    reset(p)
+    mutate!(p,mutation)
+   
   end
   avg
 end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: evol_game_simu
 version: !ruby/object:Gem::Version
-  version: 0.1.1
+  version: 0.2.1
 platform: ruby
 authors:
 - chi
 autorequire: 
 bindir: exe
 cert_chain: []
-date: 2019-01-01 00:00:00.000000000 Z
+date: 2019-01-02 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: bundler