drp 0.0.6

data/examples/intro/parameterization_example.rb

@@ -0,0 +1,32 @@
+
+require 'rubygems'
+require 'drp'
+
+class ParameterizationExample
+
+  extend DRP::RuleEngine
+
+ begin_rules
+
+  max_depth 3
+
+  def foo n
+    "[" + foo(n + 1) + "]"
+  end
+  def foo n
+    "<#{n}>" + foo(n)
+  end
+
+ end_rules
+
+  def default_rule_method n
+    "<<#{n * 2}>>!!"
+  end
+
+end
+
+pe = ParameterizationExample.new
+3.times do 
+  puts pe.foo(0)
+end 
+

data/examples/intro/toy_example.rb

@@ -0,0 +1,22 @@
+require 'rubygems'
+require 'drp'
+
+class ToyExample
+
+  extend DRP::RuleEngine
+
+ begin_rules
+
+  def foobar
+    "foo #{foobar}"
+  end
+  def foobar
+    "bar!"
+  end
+
+ end_rules
+
+end
+
+toy = ToyExample.new
+puts Array.new(3) { toy.foobar } # -> [ 'foo foo foo bar!', 'bar!', 'foo bar!' ]

data/examples/intro/weight_fcd_example.rb

@@ -0,0 +1,44 @@
+require 'rubygems'
+require 'drp'
+
+class WeightFromCurrentDepthExample
+
+  extend DRP::RuleEngine
+
+ begin_rules
+
+  max_depth 25
+  weight_fcd 20..0.1
+
+  def foo
+    "foo #{foo}"
+  end
+
+  weight 1
+
+  def foo
+    "bar!"
+  end
+
+  def mama
+    "mama #{mama}"
+  end
+  def mama
+    "mia!"
+  end
+
+ end_rules
+
+end
+
+3.times do
+  wfcde = WeightFromCurrentDepthExample.new
+  3.times do
+    puts wfcde.foo
+  end
+  puts
+  3.times do
+    puts wfcde.mama
+  end
+  puts
+end

data/examples/intro/weights_example.rb

@@ -0,0 +1,33 @@
+require 'rubygems'
+require 'drp'
+
+class WeightsExample
+
+  extend DRP::RuleEngine
+
+ begin_rules
+
+  max_depth 3
+  weight 1
+
+  def foo
+    "foo1 #{foo}"
+  end
+
+  weight 8
+
+  def foo
+    "foo2 #{foo}"
+  end
+
+ end_rules
+
+end
+
+3.times do
+  we = WeightsExample.new
+  3.times do
+    puts we.foo
+  end
+  puts
+end

data/examples/intro/weights_example_2.rb

@@ -0,0 +1,30 @@
+require 'rubygems'
+require 'drp'
+
+class WeightsExample2
+
+  extend DRP::RuleEngine
+
+ begin_rules
+
+  max_depth 2
+  weight 0..1
+
+  def foo
+    "foo1 #{foo}"
+  end
+  def foo
+    "foo2 #{foo}"
+  end
+
+ end_rules
+
+end
+
+3.times do
+  we2 = WeightsExample2.new
+  3.times do
+    puts we2.foo
+  end
+  puts
+end

data/examples/symbolic_regression.rb

@@ -0,0 +1,127 @@
+
+=begin 
+
+DRP, Genetic Programming + Grammatical Evolution = Directed Ruby Programming
+Copyright (C) 2006, Christophe McKeon
+
+This program is free software; you can redistribute it and/or
+modify it under the terms of the GNU General Public License
+as published by the Free Software Foundation; either version 2
+of the License, or (at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Softwar Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
+
+=end
+
+require 'rubygems'
+require 'drp'
+
+class SymbolicRegressionExample
+
+  extend DRP::RuleEngine
+
+  GREATEST_FLOAT_SMALLER_THAN_1 = 1 - Float::EPSILON
+
+  def initialize codons
+    @codons = codons
+    @num_codons = codons.size
+    @index = 0
+  end
+
+  def next_codon
+    res = @codons[@index]
+    @index += 1
+    @index = 0 if @index == @num_codons 
+    clamp res
+  end
+
+  def clamp float
+    return GREATEST_FLOAT_SMALLER_THAN_1 if float > GREATEST_FLOAT_SMALLER_THAN_1
+    return 0.0 if float < 0.0
+    float
+  end
+
+  def test value
+    @index = 0
+    @input = value
+    expr
+  end
+
+  begin_rules
+
+  max_depth 2..4
+
+  def op x, y
+    x + y
+  end
+  def op x, y
+    x * y
+  end
+  def op x, y
+    x - y
+  end
+  def op x, y
+    if y == 0
+      1
+    else
+      x / y
+    end
+  end
+
+  def expr
+    #puts "op(expr,expr)"
+    op(expr, expr)
+  end
+  def expr
+    #puts "@input"
+    @input
+  end
+  def expr
+    #puts "map"
+    map -5..5, :i_lin
+  end
+
+  end_rules
+
+end
+
+#############################################
+
+NUM_TEST_VALUES = 10
+SWARM_SIZE      = 250
+VECTOR_SIZE     = 16
+NUM_ITER        = 1000
+REBIRTH         = 0.0
+
+pso_class = DRP::SearchAlgorithms::PSO::ParticleSwarmOptimizer
+pso = pso_class.new SWARM_SIZE, VECTOR_SIZE, REBIRTH
+
+expr = proc { |x| x**2 + 1 }
+values = Array.new(NUM_TEST_VALUES) { rand * 2 - 1 }
+solutions = values.collect &expr
+
+NUM_ITER.times do |iter|
+  pso.each do |codons|
+    error = 0
+    sr = SymbolicRegressionExample.new codons
+    values.each_with_index do |val, i|
+      error += (sr.test(val) - solutions[i]).abs
+    end
+    error
+  end
+  gbe = pso.global_best_error
+  puts "iter #{iter+1}, best error: #{gbe}"
+  break if gbe < 0.000001
+end
+
+winner = SymbolicRegressionExample.new(pso.global_best_vector)
+puts "winning error: #{pso.global_best_error}"
+NUM_TEST_VALUES.times do |i|
+  puts "#{values[i]} -> #{winner.test(values[i])} [#{solutions[i]}]"
+end

data/lib/defaults.rb

@@ -0,0 +1,30 @@
+
+=begin 
+
+DRP, Genetic Programming + Grammatical Evolution = Directed Ruby Programming
+Copyright (C) 2006, Christophe McKeon
+
+This program is free software; you can redistribute it and/or
+modify it under the terms of the GNU General Public License
+as published by the Free Software Foundation; either version 2
+of the License, or (at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Softwar Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
+
+=end
+
+module DRP
+
+  DEFAULT = {
+    :max_depth                        => 10,
+    :weight                           => 1.0,
+    :test_for_extend_name_clashes     => true
+  }
+
+end

data/lib/drp.rb

@@ -0,0 +1,30 @@
+
+=begin 
+
+DRP, Genetic Programming + Grammatical Evolution = Directed Ruby Programming
+Copyright (C) 2006, Christophe McKeon
+
+This program is free software; you can redistribute it and/or
+modify it under the terms of the GNU General Public License
+as published by the Free Software Foundation; either version 2
+of the License, or (at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Softwar Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
+
+=end
+
+require 'defaults'
+require 'info'
+require 'error'
+require 'pso'
+require 'utils'
+require 'weights_and_max_depths'
+require 'instance_methods'
+require 'rule_engine'
+

data/lib/error.rb

@@ -0,0 +1,69 @@
+
+=begin 
+
+DRP, Genetic Programming + Grammatical Evolution = Directed Ruby Programming
+Copyright (C) 2006, Christophe McKeon
+
+This program is free software; you can redistribute it and/or
+modify it under the terms of the GNU General Public License
+as published by the Free Software Foundation; either version 2
+of the License, or (at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Softwar Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
+
+=end
+
+module DRP
+
+class DRPError < StandardError
+end
+
+class DRPNameClashError < DRPError
+
+  CLASHING_INSTANCE_METHODS = %w{
+    # default_rule_method 
+    # next_codon
+    # next_meta_codon
+    depth
+    max_depth
+    map
+  }
+  CLASHING_CLASS_METHODS = %w{
+    begin_rules
+    end_rules
+    max_depth
+    weight
+    weight_fcd
+  }
+
+  def self.test extended_klass
+    k = extended_klass
+    CLASHING_INSTANCE_METHODS.each do |m|
+      if k.method_defined?(m) or k.protected_method_defined?(m) or k.private_method_defined?(m)
+        raise(
+          self,
+          "the class you are extending already defines instance method '#{m}'",
+          caller
+        )
+      end
+    end
+    class_methods = k.methods + k.protected_methods + k.private_methods
+    CLASHING_CLASS_METHODS.each do |name|
+      if class_methods.include? name
+        raise(
+          self,
+          "the class you are extending already defines class method #{name}",
+          caller
+        )
+      end
+    end
+  end
+end # DRPNameClashError
+   
+end # module DRP

data/lib/info.rb

@@ -0,0 +1,30 @@
+
+=begin 
+
+DRP, Genetic Programming + Grammatical Evolution = Directed Ruby Programming
+Copyright (C) 2006, Christophe McKeon
+
+This program is free software; you can redistribute it and/or
+modify it under the terms of the GNU General Public License
+as published by the Free Software Foundation; either version 2
+of the License, or (at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; if not, write to the Free Softwar Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
+
+=end
+
+module DRP
+
+  VERSION_MAJOR = 0
+  VERSION_MINOR = 0
+  VERSION_TWEAK = 6   
+  Version = "#{VERSION_MAJOR}.#{VERSION_MINOR}.#{VERSION_TWEAK}"
+  Copyright = 'Copyright (c) 2006 by Chritophe McKeon <polypus@yahoo.com>'
+
+end