guided_local_search 0.0.1

checksums.yaml

@@ -0,0 +1,15 @@
+---
+!binary "U0hBMQ==":
+  metadata.gz: !binary |-
+    ZmQ4YzhkNGMwM2I1NGQzODVhODMxYzRkYmNiMzIyODliZGNjMGMzMA==
+  data.tar.gz: !binary |-
+    YTdhNTk1NTM2ODk4NTY5ZTg0MWNhZmFlMTk5MGVjNWE4YTcwOWZmZA==
+SHA512:
+  metadata.gz: !binary |-
+    ZWMwNjgzZTY1NGQyMmMwOWRiYTVjZjdmN2RlYjJkZjE5ZTZlMjFiNTRhYmQw
+    OWJiOGE5NGE0NjM5ZDdjMmZiOWIxMzI1ODExMDRiOWUyYzkxMTYzMGZhYWU2
+    N2FkOTFhYjllZTU5MTI0ZDFmMDQ5Yjk4ZjkyOGU5OWVjYmE2MmY=
+  data.tar.gz: !binary |-
+    ZWE2MWUzMDE3NjFiYjY5ZjVmY2UzYzI2YjdhOGY3N2Q5OTQ4ZmQwMDA3ZDg1
+    MzlhY2JiM2Q2NDI2YWE5MjA1ZjVjYjNlN2NiNjUxZGUyNjQ5Mjg0NjI2ODQz
+    YTQ0NmYwNDM2MjIxNzRhZWJkNmRkODZhYmRhMDgwMmZhMzQ0MWQ=

data/.gitignore

@@ -0,0 +1,17 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in guided_local_search.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,22 @@
+Copyright (c) 2013 dusan
+
+MIT License
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.md

@@ -0,0 +1,29 @@
+# GuidedLocalSearch
+
+Guided local search to solve travelling salesman.
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'guided_local_search'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install guided_local_search
+
+## Usage
+
+For example GuidedLocalSearch::GuidedLocalSeach.new.search(150, [[50, 50],[70, 70]], 20, 70)
+
+## Contributing
+
+1. Fork it
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Add some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request

data/Rakefile

@@ -0,0 +1,6 @@
+require "bundler/gem_tasks"
+require "rspec/core/rake_task"
+
+RSpec::Core::RakeTask.new("spec")
+
+task :default => :spec

data/guided_local_search.gemspec

@@ -0,0 +1,24 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'guided_local_search/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "guided_local_search"
+  spec.version       = GuidedLocalSearch::VERSION
+  spec.authors       = ["no-glue"]
+  spec.email         = ["nikolapav1985@gmail.com"]
+  spec.description   = %q{does guided local search to solve travelling salesman}
+  spec.summary       = %q{does guided local search to solve travelling salesman}
+  spec.homepage      = ""
+  spec.license       = "MIT"
+
+  spec.files         = `git ls-files`.split($/)
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.test_files    = spec.files.grep(%r{^(test|spec|features)/})
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "bundler", "~> 1.3"
+  spec.add_development_dependency "rake"
+  spec.add_development_dependency "rspec"
+end

data/lib/guided_local_search.rb

@@ -0,0 +1,104 @@
+require "guided_local_search/version"
+
+module GuidedLocalSearch
+  class GuidedLocalSearch
+    # get line distance between cities
+    def euc_2d(c1, c2)
+      Math.sqrt((c1[0] - c2[0]) ** 2 + (c1[1] - c2[1]) ** 2).round
+    end
+
+    # shake cities (random permute)
+    def random_permutation(cities)
+      shake = Array.new(cities.size){|i| i}
+      shake.each_index do |i|
+        r = rand(shake.size - i) + i
+        shake[r], shake[i] = shake[i], shake[r]
+      end
+      shake
+    end
+
+    # shake in range
+    def stochastic_two_opt(shake)
+      sh = Array.new(shake)
+      c1, c2 = rand(sh.size), rand(sh.size)
+      pool = [c1]
+      pool << ((c1 == 0) ? sh.size - 1 : c1 + 1)
+      pool << ((c1 == (sh.size - 1)) ? 0 : c1 - 1)
+      c2 = rand(sh.size) while pool.include? c2
+      c1, c2 = c2, c1 if c2 < c1
+      sh[c1...c2] = sh[c1...c2].reverse
+      sh
+    end
+
+    # get augmented cost
+    def augmented_cost(shake, penalties, cities, modifier)
+      distance, augmented = 0, 0
+      shake.each_with_index do |c1, i|
+        c2 = (i == (shake.size - 1)) ? shake[0] : shake[i + 1]
+        c1, c2 = c2, c1 if c2 < c1
+        d = euc_2d cities[c1], cities[c2]
+        distance += d
+        augmented += d + (modifier * penalties[c1][c2])
+      end
+      [distance, augmented]
+    end
+
+    # get shake cost
+    def cost(cand, penalties, cities, modifier)
+      cost, acost = augmented_cost cand[:vector], penalties, cities, modifier
+      cand[:cost], cand[:aug_cost] = cost, acost
+    end
+
+    # get utilities
+    def feature_utilities(penal, cities, shake)
+      utilities = Array.new(shake.size, 0)
+      shake.each_with_index do |c1, i|
+        c2 = (i == (shake.size - 1)) ? shake[0] : shake[i + 1]
+        c1, c2 = c2, c1 if c2 < c1
+        # +++ metric utilities
+        utilities[i] = euc_2d(cities[c1], cities[c2]) / (1.0 + penal[c1][c2])
+      end
+      utilities
+    end
+
+    # update penalties
+    def update_penalties(penalties, cities, shake, utilities)
+      max = utilities.max()
+      shake.each_with_index do |c1, i|
+        c2 = (i == (shake.size - 1)) ? shake[0] : shake[i + 1]
+        c1, c2 = c2, c1 if c2 < c1
+        # +++ metric penalties
+        penalties[c1][c2] += 1 if utilities[i] = max
+      end
+      penalties
+    end
+
+    # do local search
+    def local_search(current, cities, penalties, max_no_improv, modifier)
+      cost current, penalties, cities, modifier
+      count = 0
+      begin
+        candidate = {:vector => stochastic_two_opt(current[:vector])}
+        cost candidate, penalties, cities, modifier
+        count = (candidate[:aug_cost] < current[:aug_cost]) ? 0 : count + 1
+        current = candidate if candidate[:aug_cost] < current[:aug_cost]
+      end until count >= max_no_improv
+      current
+    end
+
+    # do search
+    def search(max_iterations, cities, max_no_improv, modifier)
+      current = {:vector => random_permutation(cities)}
+      best = nil
+      penalties = Array.new(cities.size){Array.new(cities.size, 0)}
+      max_iterations.times do |iter|
+        current = local_search current, cities, penalties, max_no_improv, modifier
+        utilities = feature_utilities penalties, cities, current[:vector]
+        update_penalties(penalties, cities, current[:vector], utilities)
+        best = current if best.nil? or current[:cost] < best[:cost]
+        puts " > iter #{(iter + 1)}, best = #{best[:cost]}, aug = #{best[:aug_cost]}"
+      end
+      best
+    end
+  end
+end

data/lib/guided_local_search/version.rb

@@ -0,0 +1,3 @@
+module GuidedLocalSearch
+  VERSION = "0.0.1"
+end

data/spec/guided_local_search_spec.rb

@@ -0,0 +1,15 @@
+require 'spec_helper'
+
+describe GuidedLocalSearch do
+  it 'gets 7542 or greater for berlin' do
+    expect(GuidedLocalSearch::GuidedLocalSearch.new.search(150, [[565,575],[25,185],[345,750],[945,685],[845,655],
+   [880,660],[25,230],[525,1000],[580,1175],[650,1130],[1605,620],
+   [1220,580],[1465,200],[1530,5],[845,680],[725,370],[145,665],
+   [415,635],[510,875],[560,365],[300,465],[520,585],[480,415],
+   [835,625],[975,580],[1215,245],[1320,315],[1250,400],[660,180],
+   [410,250],[420,555],[575,665],[1150,1160],[700,580],[685,595],
+   [685,610],[770,610],[795,645],[720,635],[760,650],[475,960],
+   [95,260],[875,920],[700,500],[555,815],[830,485],[1170,65],
+   [830,610],[605,625],[595,360],[1340,725],[1740,245]], 20, 70)[:cost]).to be >= 7542
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,6 @@
+require 'rubygems'
+require 'bundler/setup'
+require 'guided_local_search'
+
+RSpec.configure do |config|
+end

metadata

@@ -0,0 +1,98 @@
+--- !ruby/object:Gem::Specification
+name: guided_local_search
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- no-glue
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2013-12-18 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.3'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.3'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: does guided local search to solve travelling salesman
+email:
+- nikolapav1985@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- guided_local_search.gemspec
+- lib/guided_local_search.rb
+- lib/guided_local_search/version.rb
+- spec/guided_local_search_spec.rb
+- spec/spec_helper.rb
+homepage: ''
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.1.11
+signing_key: 
+specification_version: 4
+summary: does guided local search to solve travelling salesman
+test_files:
+- spec/guided_local_search_spec.rb
+- spec/spec_helper.rb