metaheuristics 0.1.0 → 0.2.0

data/README.md

@@ -1,9 +1,10 @@
 
-Metaheustics
-============
+Metaheuristics
+==============
 
 A ruby library of metaheuristics for search/optimisation.
 
+`gem install metaheuristics`
 
 Usage
 -----

data/lib/metaheuristics/genome_generic.rb

@@ -0,0 +1,148 @@
+require 'metaheuristics/genome_interface'
+
+# A generic genome class.
+# random genomes for a given structure definition can be generated
+# via calls to the class method +new_random+. The structure definition
+# is an array of gene definitions; a gene definition is a hash like the followings:
+#
+# * { :type => :boolean }
+# * { :type => :int    , :range => 0..10        }
+# * { :type => :real   , :range => -3.42..176.8 }
+#
+class GenomeGeneric < GenomeInterface
+
+	attr_reader :definition, :values
+
+	# new random genome from definition
+	def self.new_random(definition)
+		values = definition.collect do |h|
+			type = h[:type]
+			case(type)
+			# boolean
+			when :boolean
+				rand(2) == 0
+
+			# int
+			when :int
+				range = h[:range] || (raise ArgumentError)
+				rand(range.last - range.first + 1) + range.first
+
+			# real
+			when :real
+				range = h[:range] || (raise ArgumentError)
+				rand * (range.last - range.first) + range.first
+
+			# sample
+			when :sample
+				range = h[:range] || (raise ArgumentError)
+				size  = h[:size ] || (raise ArgumentError)
+				range.to_a.sample(size)
+
+			else raise ArgumentError, "Unknown gene type '#{type}'" end
+		end
+
+		self.new(
+			definition,
+			values)
+	end
+
+	# ctor
+	def initialize(definition, values)
+		definition.freeze
+		@definition = definition
+		@values     = values
+	end
+
+	# clone
+	def clone
+		GenomeGeneric.new(
+			@definition,
+			@values.clone)
+	end
+
+
+	# mutate this
+	def mutate!(mutation_rate)
+		@definition.size.times do |i|
+			if rand < mutation_rate
+				h = @definition[i]
+				case(h[:type])
+				when :boolean # boolean
+					@values[i] = !@values[i]
+
+				when :int     # int
+					range = h[:range]
+					@values[i] = rand(range.last - range.first + 1) + range.first
+
+				when :real    # real
+					range = h[:range]
+					@values[i] = rand * (range.last - range.first) + range.first
+
+				when :sample # sample
+					range = h[:range]
+					size  = h[:size ]
+					assert{ @values[i].size == size }
+					a = range.to_a
+					index = rand(size)
+					current = @values[i]
+					new_int = a.sample(1) while current.include?(new_int)
+					current[index] = new_int
+
+				else raise RuntimeError end
+			end
+		end
+
+		self
+	end
+
+
+	# crossover (uniformly applied)
+	def crossover(genome)
+		self_values  = @values
+		other_values = genome.values
+		values =
+			Array.new(self_values.size) do |i|
+				h = @definition[i]
+				case(h[:type])
+				when :boolean, :int, :real
+					[self_values, other_values][rand(2)][i]
+
+				when :sample # sample
+					range = h[:range]
+					size  = h[:size ]
+					(self_values[i] + other_values[i]).sort.uniq.sample(size)
+ 		 
+				else raise RuntimeError end
+			end
+
+		GenomeGeneric.new(
+			@definition,
+			@values)
+	end
+
+	# to string
+	def to_s
+		Array.new(@definition.size) do |i|
+			h = @definition[i]
+			v = @values[i]
+			case(h[:type])
+			when :boolean # boolean
+				v ? 'X' : '_'
+
+			when :int     # int
+				range = h[:range]
+				count = (range.last - range.first) / 10
+				" #{v.to_s.rjust(count + 1)} "
+
+			when :real    # real
+				range = h[:range]
+				" #{'%.2f' % v} "
+
+			when :sample  # sample
+				"[#{v.collect{ |r| r.to_s.rjust(2) }.join(', ') }]"
+
+			else raise RuntimeError end
+		end.join
+	end
+end # GenomeGeneric
+

data/lib/metaheuristics/genome_interface.rb

@@ -0,0 +1,7 @@
+
+class GenomeInterface
+	def clone                 ; raise NotImplementeError; end
+	def mutate!(mutation_rate); raise NotImplementeError; end
+	def crossover(genome)     ; raise NotImplementeError; end
+end # GenomeInterface
+

data/lib/metaheuristics/genome_search/alps_ga.rb

@@ -1,6 +1,5 @@
-require 'metaheuristics/metaheuristic_interface'
+require 'metaheuristic_interface'
 require 'metaheuristics/search_results'
-require 'utils/assert'
 
 class AlpsGa < MetaheuristicInterface
 
@@ -115,7 +114,8 @@ class AlpsGa < MetaheuristicInterface
 			l.sort!.reverse!
 			$stderr << "= layer #{idx} : max age #{max_layer_age(idx)} ---------------------------------------------------------------\n"
 			l.each do |i|
-				$stderr << " - #{i.solution.__id__.to_s.rjust(7)}, fitness #{i.fitness.to_i.to_s.rjust(6)}, age #{i.age.to_s.rjust(4)}\n"
+#				$stderr << " - #{i.solution.__id__.to_s.rjust(7)}, fitness #{i.fitness.to_i.to_s.rjust(6)}, age #{i.age.to_s.rjust(4)}\n"
+				$stderr << " - #{i.solution.__id__.to_s.rjust(7)}, fitness #{('%.4f' % i.fitness).rjust(7)}, age #{i.age.to_s.rjust(4)}\n"
 			end
 		end
 		$stderr << "\n"
@@ -208,8 +208,8 @@ private
 	def move_to_layer(individuals, n)
 		# add layer
 		if n > (@layers.size - 1)
-			assert{ n <  @max_layer_count }
-			assert{ n == @layers.size     }
+			raise RuntimeError unless n <  @max_layer_count
+			raise RuntimeError unless n == @layers.size
 			@layers[n] = []
 		end
 

data/lib/metaheuristics/genome_search/fgrn_ga.rb

@@ -1,4 +1,4 @@
-require 'metaheuristics/metaheuristic_interface'
+require 'metaheuristic_interface'
 require 'metaheuristics/individual_solution'
 
 class FgrnGa < MetaheuristicInterface

data/lib/metaheuristics/genome_search/tournament_selection.rb

@@ -1,4 +1,4 @@
-require 'metaheuristics/metaheuristic_interface'
+require 'metaheuristic_interface'
 require 'metaheuristics/individual_solution'
 require 'metaheuristics/search_results'
 

metadata

@@ -2,14 +2,14 @@
 name: metaheuristics
 version: !ruby/object:Gem::Version
   prerelease:
-  version: 0.1.0
+  version: 0.2.0
 platform: ruby
 authors:
 - Jean Krohn
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2012-08-29 00:00:00.000000000 Z
+date: 2012-09-25 00:00:00.000000000 Z
 dependencies: []
 description: Metaheuristics include Genetic Algorithms (GAs), such as ALPS and tournament selection.
 email: jbk@susano.org
@@ -18,10 +18,12 @@ extensions: []
 extra_rdoc_files: []
 files:
 - README.md
+- lib/metaheuristic_interface.rb
+- lib/metaheuristic_init_factory.rb
+- lib/metaheuristics/genome_generic.rb
+- lib/metaheuristics/genome_interface.rb
 - lib/metaheuristics/individual_solution.rb
 - lib/metaheuristics/search_results.rb
-- lib/metaheuristics/metaheuristic_interface.rb
-- lib/metaheuristics/metaheuristic_init_factory.rb
 - lib/metaheuristics/genome_search/alps_ga.rb
 - lib/metaheuristics/genome_search/fgrn_ga.rb
 - lib/metaheuristics/genome_search/tournament_selection.rb